x 축 라벨 간격을 좁히기 R

Question

저는 MLB 급여를 받고 있습니다. 도형의 왜곡을 시각화하기 위해 도수 분포를 플로팅하려고합니다. 내 히스토그램의 x 축 레이블을 만드는 데 문제가 있습니다. Btw, here에서 내 MLB 급여 데이터를 받았습니다. 여기

내가 내 분포를 생성하는 방법이다 : 내 연봉을 감안할 때 $ 3,500 만 범위는 0

hist(data, breaks = 33, axes = F) 

를,이 같은 내 레이블을 생성 - 축 (사용

x.axis <- pretty(seq(0,35000000, by = 10000000))/10000000 

x.axis 
>[1] 0.0 0.5 1.0 1.5 2.0 2.5 3.0 

) 함수 만 처음 8 개의 레이블을 그립니다.

axis(1, at = y, labels = paste(y, "M", sep ="")) 

나는 이것이 length(x.axis) = 8과 같다고 생각합니다.

내 x 축에서 진드기를 간격을 두는 방법이 있습니까?

미리 감사드립니다.

Answer 1

알아 냈어!

pts <- pretty(data/10000000) 
a <- (seq(0,35000000, by = 5000000)) 

axis(1, at = a, labels = paste(pts, "M", sep =""))