Category: R

RStudio

어느 순간 확인해보니 버젼이 드디어 1.0을 넘어섰길래 업그레이드 해봤다. 그런데 차이를 잘 모르겠다. 몇몇 바뀐 설정 화면이 있기는 하였지만, 크게 와닿는 정도는 아니었음.

2016-11-03
function 에서 기본값 지정
R로 분석하다 보면 function 함수를 통하여 원하는 기능을 반복하게 만드는 경우가 있다. 이 경우에 지정한 입력값을 다 입력을 해야 그 함수가 실행하게 되고, 그렇지 않으면 에러가 발생하여 중단되게 된다. 항상 지정해주면 좋기는 하지만, 꼭 그럴 필요는 없는 경우에는 해당 값에 해당하는 기본값을 지정하면 된다. 함수는 missing() 을 이용한다. R의 예제가 굉장히 간단하고, function 을 이용할 정도의 사용자는 쉽게 이해 가능하기 때문에 도움말을 그대로 복사해 둔다.
```
myplot <- function(x, y) {
                if(missing(y)) {
                        y <- x
                        x <- 1:length(y)
                }
                plot(x, y)
        }
```
2016-09-10
숫자 자리수 prettyNum()

prettyNum(SUMMARYTABLE1.3digit[X, Y], big.mark = “,”, preserve.width=”none”)

숫자 3자리마다 “,” 를 삽입하는 방법 중 하나이다. 기본적으로 3자리수로 설정되어 있기 때문에, 별도의 자릿수는 지정하지 않아도 된다.

2016-06-29
축 axis에 중단표시 하기

Y축에 해당하는 값들을 막대그래프로 보이도록 표시해보는게 어떻겠냐는 교수님의 말씀에 따라서, 이리저리 머리를 굴려보다가 이런 방법을 떠올렸다. 중단 기호(생략 기호라고도 할 수 있는)를 사용하여 빈 값이 있는 X축을 줄여버리고, 나머지 값이 있는 부분을 늘려서 표시하면 막대그래프처럼 보인다. 중단 기호를 포샵 처리 할까 싶다가, 구글 검색을 해보았고, 하나의 방법을 골랐다.

plotrix 라는 패키지를 설치한 다음 axis.break() 명령어를 사용하여 기호를 넣으면 된다. 그에 앞서서 저런식으로 보여지게끔 X축의 값을 적당히 생략해서 그래프를 그리도록 하면 됨.

barplot(a[c(1:50, 481:length(a))], ylim=c(0.1, 300), log=”y”,xlab=”Cases”, ylab=”H-Score”, axes=F, lwd=lwd.number, cex.lab=cex.number)
axis(1, case.number.2, at=case.number.location, lwd=lwd.number, cex.axis=cex.number)
axis(2, score.number, at=score.number, las=1, lwd=lwd.number, cex.axis=cex.number, las=1)
axis.break(1, 50, style = “slash”)

2016-01-26