모조리 기획해주마

[결과물]

[코드]

> install.packages("shiny") ## 패키지 설치

> library(shiny)

> runExample()

Valid examples are "01_hello", "02_text", "03_reactivity", "04_mpg", "05_sliders", "06_tabsets", "07_widgets", "08_html", "09_upload", "10_download", "11_timer"

> runExample("01_hello") ## 위의 가능한 

[레퍼런스]

http://1004jonghee.tistory.com/entry/%EC%83%A4%EC%9D%B4%EB%8B%88Shiny-%ED%8C%A8%ED%82%A4%EC%A7%80

[코드]

Sys.setlocale("LC_ALL","ko_KR.UTF-8")

-맥의 경우 UTF-8로 설정을 해도 한글이 종종 깨집니다.

-이유는 mac이 locale 설정이 기본적으로 안되어 있는 경우가 종종 있어서 그렇습니다.

-이런 경우 위의 코드로 locale설정을 바꾸어주면 R studio에서 깨지는 일이 사라집니다.

-Data 시각화 공부와 정리

[결과물]

[사용 데이터 예시]

[사용 코드]

library(ggmap)

## ggmap이 버전이슈가 최근에 있어서 오류가 날지도 모른다.

## 그런 경우 install.packages("ggmap", type = "source") 를 통해 다시 설치하면 해결.

library(ggplot2)

a <- read.csv(file = "rarara.csv", sep = "," , header = TRUE)

## 파일을 불러오기

sub_a <- subset(a, rain > 50, select = c("longti","latti","rain"))

## 위도와 경도만 가져와서 subset을 만듭니다.

str(sub_a)

cent <- c(lon = 127.8, lat = 35.8)

## 한국(남한)기준 위도 경도의 중심입니다.

map <- ggmap(get_googlemap(center = cent, zoom = 7, maptype='roadmap', color = 'bw'), extent = 'device')

## map 변수에 구글 지도(남한) 부분을 저장합니다.

map + geom_point(data=sub_a, aes(x=longti, y=latti),colour ='gray10', alpha = 1) ## 점을 찍어주는 라인

[레퍼런스]

전국댐위치.xlsx

::비주얼라이즈님의 블로그

http://visualize.tistory.com/111

::Lovetoken님의 블로그

https://lovetoken.github.io/r/data_visualization/2016/10/18/ggmap.html