2017-03-13 16 views
1

15 년 동안 다른 교육 수준을 가진 사람들의 주당 평균 소득을 보여주는 데이터 세트가 있습니다. 나는 두 가지 교육 수준 각각에 대한 값의 산점도를 만들려고 노력하고 있습니다. 그러나 어떤 이유로 내 계획은 각 교육 수준의 y 값을 따로 따로 주문한 다음에 쌓습니다.ggplot 축은 수집 된 데이터의 하위 집합에 대해 별도의 순서가 있으므로 결합 할 수 있습니까?

Here is the Current Scatterplot, the problem is the order of the values on the Y axis

나는 이것이 내가 원래 값을 수집하는 방법 또는 내가 줄거리를 생성하고 방법에 문제가 있다면 모르겠지만, 나는이와 몇 가지 다른 사이트를 통해보고하고 난 알아낼 수 없습니다 이 문제를 해결하는 방법. 아래 코드를 포함 시켰습니다.

EdData <- read.csv("~/desktop/EdData.csv") 

library(ggplot2) 
library(tidyr) 
library(dplyr) 

EdData_Long <- gather(EdData, "Education", "Earnings", Weekly.Earnings.HS.Only, Weekly.Earnings.College, na.rm = FALSE) 

ggplot(data = EdData_Long, aes(x = Year, y = Earnings, colour = Education)) + geom_point() 

나는 R 꽤 새로운 해요, 그래서 이것은 정말 기본적인 경우 미안 해요. 나는 게시하기 전에 답을 찾으려고 노력하겠다고 약속하지만, 내가 겪고있는 문제를 설명하기에 적합한 용어조차도 모른다. 제공 할 수있는 도움에 미리 감사드립니다.

이 도움이 될 것입니다 경우, 내가 게시 한 (아주 작은) 데이터는 CSV 파일이 손상된 것 같습니다 here

+3

이 읽은 : 당신은 또한 gather 수정해야하므로,

library(readr) EdData <- read_csv("EdData.csv", col_types = cols('Annual Difference' = col_number(), Tuition = col_number(), 'Weekly Earnings College' = col_number(), 'Weekly Earnings Difference' = col_number(), 'Weekly Earnings HS Only' = col_number(), 'Weekly Earnings No HS' = col_number())) 

이 열 이름에 공간을 보존합니다 : 그것은 변환을 파악한다 안으로 숫자. R은 숫자 값에서 "$"을 좋아하지 않습니다. 데이터를 올바르게 가져 오면이 문제가 해결 될 수 있습니다. 이것은 도움이 될 수 있습니다 : http://stackoverflow.com/questions/7337824/read-csv-file-in-r-with-currency-column-as-numeric/7338251#7338251 – MrFlick

+0

Excel에서 csv를 열고 모든 것을 "일반"다음 다시 아래에 내 대답을 생산 그것을 저장. 나는 단지 주석을 달았지만 그래픽을 추가하고 싶었다. –

답변

1

설정합니다. 나는 동일한 데이터와 코드를 가지고 이것을 정리하고 이것을 얻었다 : EdData corrected plot

이것은 당신이 말한 내용인가?

+0

네, 고맙습니다. 그것은 내가 데이터를 가져 오는 방식에 문제가 될 수 있다는 사실을 알지 못했습니다. – bbernicker

1

readr 패키지의 read_csv을 사용하여 열이 숫자임을 지정할 수 있습니다.

그것은 '수입 컬럼처럼 보이지 않는
EdData_Long <- gather(EdData_csv_EdData_csv, "Education", "Earnings", 
         `Weekly Earnings HS Only`, `Weekly Earnings College`, 
         na.rm = FALSE) 
+0

감사합니다. 앞으로이 문제가있는 다른 사람들에게 도움이 될 것입니다. – bbernicker