[R] R을 이용한 통계 분석 및 데이터 시각화 : ggplot2 (유효숫자 표시)

 정보

• 업무명     : R을 이용한 통계 분석 및 데이터 시각화 : ggplot2 (유효숫자 표시)

• 작성자     : 박진만

• 작성일     : 2020-04-07

• 설   명      :

• 수정이력 :

 

 내용

[개요]

• R은 통계 분석 및 시각화 등의 기능을 갖춘 프로그래밍 언어 내지 통계 분석 환경입니다. 
  

• 통계 분석 기능으로 통계 검정, 선형 회귀 분석, 시계열 데이터 분석, 클러스터링 등을 지원하고 있습니다.
  

• 또한 최신 논문에서 발표된 같은 새로운 기술도 R로 구현되는 경우가 많습니다.
  

• 특히 시각화 기능으로 히스토그램, 막대 그래프, 선 그래프, 산포도, 나무 모양 그림이나 히트맵 등 기본적인 그래프가 기본으로 지원하고 있습니다.
  

• 또한 ggplot2 등의 패키지를 사용하여 더 높은 수준의 그림을 가시화할 수 있습니다.
  

 

 

[특징]

• 데이터를 이해하기 위해서 통계 분석 및 데이터 시각화가 요구되며 이 프로그램은 이러한 목적을 달성하기 위한 소프트웨어

   

[기능]

• 데이터형 소개

 

[활용 자료]

• 없음

 

[자료 처리 방안 및 활용 분석 기법]

• 없음

 

[사용법]

• 소스 코드 예시 참조

 

[사용 OS]

• Windows 10

 

[사용 언어]

• R v3.6.2

• R Studio v1.2.5033

 

 소스 코드

[유효 숫자 표시]

• ggplot2를 사용하여 그래프를 그리면 그래프의 축은 보통 숫자 1500 또는 지수 표기 1.5e + 04와 같이 표시된다.

• 이것을 1.5 × 10^4 같은 지수 형태로 표기하고 싶다면, 스스로 축 눈금 표기 라벨을 만들어야 할 필요가 있다.

scientific_notation <- function(x) {
     x <- format(x, scientific = TRUE)
     x <- gsub("^(.*)e", "'\\1'e", x)
     x <- gsub("e", "%*%10^", x)
     x <- gsub('\\+', '', x)
     parse(text = x)
}

 

• 다음 ggplot2를 이용하여 그래프를 플롯한다.

• 지수 표시 스타일을 변경할 좌표축에 함수를 대입한다. 다음은 y 축의 지수 표시를 변경하는 예이다.

library(ggplot2)

sample <- rep(c("Sample 1", "Sample 2", "Sample 3"), each = 3)
gene   <- rep(c("V1", "V2", "V3"), times = 3)
freq   <- c(15045, 13400, 9041, 17031, 13095, 10391, 14093, 12050, 9404)

dat <- data.frame(sample = sample, gene = gene, frequency = freq)


g <- ggplot(dat, aes(x = gene, y = frequency, fill = sample))
g <- g + geom_bar(stat = "identity", position = "dodge")
g <- g + scale_y_continuous(labels = scientific_notation)
g <- g + scale_fill_brewer(palette = "Set1")
plot(g)

 

[다음글]

[R] R을 이용한 통계 분석 및 데이터 시각화 : tidyr

 

[이전글]

[R] R을 이용한 통계 분석 및 데이터 시각화 : ggplot2 (색과 채우기 지정)

 

 참고 문헌

[논문]

• 없음

[보고서]

• 없음

[URL]

• 없음

 

 문의사항

[기상학/프로그래밍 언어]

• sangho.lee.1990@gmail.com

[해양학/천문학/빅데이터]

• saimang0804@gmail.com

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

본 블로그는 파트너스 활동을 통해 일정액의 수수료를 제공받을 수 있음