메뉴 건너뛰기

<코드>

 

pop <- read.csv('부주의에+의한+화재발생(소방서별)_20221214144839.csv', header=FALSE, encoding="UTF-8")

pop_header <- pop[1:2,]

pop_header

pop_data <- pop[3:nrow(pop),]

colnames(pop_data) <- c('Firestation1','Firestation2','category','cause','num')

head(pop_data)

 

idx <- which(pop_data[,'Firestation2']=='소계')

pop_cause <- pop_data[idx,]

 

pop_cause <- pop_cause[1:nrow(pop_cause),]

head(pop_cause)

ds <- data.frame(pop_num = as.numeric(pop_data$num),

                pop_cause$cause)

ds

colnames(ds)

 

library(ggplot2)

ggplot(ds,aes(x= pop_cause, y=pop_num, fill=colnames(ds))) +

  geom_bar(stat = "identity") +

  theme(axis.text.x=element_text(angle=45,colour="blue", size=10))

 

------------------------------------------------

 

<오류>
Don't know how to automatically pick scale for object of
type <data.frame>. Defaulting to continuous.
Error in `geom_bar()`:
! Problem while computing aesthetics.
ℹ Error occurred in the 1st layer.
Caused by error in `check_aesthetics()`:
! Aesthetics must be either length 1 or the same
  as the data (220)
✖ Fix the following mappings: `x` and `fill`
Run `rlang::last_error()` to see where the error occurred.
 
-------------------------------------------------
 
데이터 : https://data.seoul.go.kr/dataList/10949/S/2/datasetView.do
 
--------------------------------------------------
 
내용 : 
부주의에 의한 화재 유형 중 어떤 유형에 의해 가장 많은 화재가 발생하는 지 그래프를 만들려고 했는데
이런 오류가 떠서 질문 드립니다 ..ㅠㅠㅠㅠ 뭐가 문제일까요? ㅠㅠㅠㅠ
번호 제목 글쓴이 날짜 조회 수
1164 Cluster analysis in Web-R 깨수깡 2023.02.07 0
1163 Mytable yes만 출력 도삼 2023.02.07 0
1162 안녕하세요. 정회원인데, 정회원 서버에서 Table 만들기 하면 [2] brainok 2023.02.03 0
1161 반복 분석 자료 분석에 대해서 [1] ng2o321 2023.01.30 0
1160 로그인 에러 및 결과 ppt 다운로드 에러 [1] file JuEuna 2023.01.29 0
1159 ROC curve 절단점찾기 [1] 바보거부기 2023.01.27 0
1158 [문의] 1/28 생존분석 워크샵 강의자료 유무 [1] swpapa 2023.01.27 0
1157 regression 결과 ppt 다운로드 오류 [2] JuEuna 2023.01.26 0
1156 Multiple regression 기본 acs data로 돌려도 오류가 납니다. [3] 케로스 2023.01.22 28
1155 webrPSM 설치 문제 [1] hawk1227 2023.01.03 30
1154 정회원용서버 ExploPlots 오류 [1] 버블 2023.01.03 14
1153 생존분석에서 세군이상 시 사후 검정이 가능할지 여쭙습니다 [1] 정망고 2023.01.03 29
1152 gaze에서 show.stats Arguments가 작동하지 않습니다. [1] 김찬식 2022.12.31 21
1151 서버 연결이 자꾸 끊깁니다. [1] secret wave 2022.12.30 2
1150 PSM, full matching, cox proportional hazard model [4] file 주니 2022.12.28 35
1149 비밀번호 찾기 오류. [2] ezra006 2022.12.24 132
1148 메타분석 설정 관련 문의드립니다 화이팅 2022.12.16 29
» 그래프 만들던 중 오류 질문드립니다.. [1] file 헝힝헝 2022.12.14 44
1146 multipleROC 패키지 질문 [2] 강우성 2022.12.14 48
1145 웹에서 하는 R통계 (무료버전) 업로드 가능한 파일 용량이 궁금합니다. [2] 성열 2022.12.10 41