복수응답 카운팅하기

설문조사결과를 받다보면 

복수응답으로 응답을 해서 코딩 시 한개의 셀안에 

1,2,3 등으로 코딩해주는 곳이 가끔 있다. 

raw data를 받고 참 난감했는데 

잠깐 머리를 굴려보니 function 기능을 이용해서 한방에 카운팅까지 끝내는 방법을 찾고야 말았다.

역시 아쉬운 사람이 우물을 파는 것인가.. 

1. str() 함수를 통해 해당 셀의 속성을 파악한 뒤, 

2. character 로 속성을 바꿔준다. 

3. ","를 기준으로 문자열을 분리 시켜주고..

4. unlist 형태로 바꿔서..

5. 내림차순으로 카운팅.. 

이걸 코드로 바꿔버리면.. 

f=function(x){
  x=as.character(x) #2
  temp=strsplit(x, ",") #3
  a=unlist(temp) #4
  a=sort(table(a), decreasing=T) #5
  print(a) #출력
}

어렵지도 복잡하지도 않은 코드 생성

이렇게 또하나 배운다.. 

필요한건 또 찾아서 만들어보는것으로.. 

불친절한 블로그임으로 예제는 없습니다.