ggplot의 geom_bar에서 가로 막대 색상 지정

debugcn 에 게시 Dev

과

나는 몇 가지 문제가 있어요 ggplot2'들 geom_bar:

내 데이터는 다음과 같습니다.

set.seed(1)
df <- data.frame(log10.p.value = -10*log10(runif(10,0,1)), y = letters[1:10], col = rep("#E0E0FF",10), stringsAsFactors = F)
#specify color by log10.p.value
df$col[which(df$log10.p.value > 2)] <- "#EBCCD6"
df$col[which(df$log10.p.value > 4)] <- "#E09898"
df$col[which(df$log10.p.value > 6)] <- "#C74747"
df$col[which(df$log10.p.value > 8)] <- "#B20000"
#truncate bars
df$log10.p.value[which(df$log10.p.value > 10)] <- 10

보시다시피 각 log10.p.value간격에는 다른 색상이 할당되어 있으며 막대가 확장되지 않도록하려면 log10.p.value = 10이러한 값을 10으로 설정합니다.

내 ggplot명령은 다음과 같습니다.

p <- ggplot(df, aes(y=log10.p.value,x=y,fill=as.factor(col)))+
  geom_bar(stat="identity",width=0.2)+coord_flip()+scale_y_continuous(limits=c(0,10),labels=c(seq(0,7.5,2.5)," >10"))+
  theme(axis.text=element_text(size=10))+scale_fill_manual(values=df$col,guide=FALSE)

그리고 그림은 다음과 같습니다.

문제는 다음과 같습니다.

플롯의 막대 색상이 일치하지 않습니다 df$col. 예를 들어 막대 a와 b는 # E09898이 아닌 # EBCCD6으로 표시됩니다.
x 축 마지막 눈금 텍스트를 "> 10"으로 수동으로 지정하기 때문에 해당 눈금의 오른쪽에 추가 공간이 생성되어 10에서 잘린 막대가 10에서 끝나는 것처럼 보이게하는 반면 제 의도는 줄거리의 오른쪽 끝까지 이동합니다.

Shreyasgm

생성 한 그래프를 재현 할 수 없습니다. 제공 한 코드를 실행하면 다음 그래프가 생성됩니다.

전달하는 벡터의 이름을 지정하여 색상을 올바르게 지정할 수 있습니다 scale_fill_manual.

coloursv <- df$col
names(coloursv) <- df$col

질문의 두 번째 부분으로, expand매개 변수를 사용하여 막대와 그래프 가장자리 사이에 공간이 없는지 확인할 수 있습니다 scale_y_continuous.

이 두 가지를 변경하면 플롯의 코드는 다음과 같습니다.

p <- ggplot(df, aes(y=log10.p.value,x=y,fill=as.factor(col)))+
    geom_bar(stat="identity",width=0.2) +
    scale_y_continuous(limits=c(0,10),
                       labels=c(seq(0,7.5,2.5)," >10"),
                       expand = c(0,0)) +
    theme(axis.text=element_text(size=10)) +
    scale_fill_manual(values = coloursv,guide = F) +
    coord_flip()

'> 10'레이블은 약간 잘립니다. 다음을 사용하여 플롯 여백을 늘릴 수 있습니다.

p + theme(plot.margin=unit(c(0.1,0.5,0.1,0.1),"cm"))

이 기사는 인터넷에서 수집됩니다. 재 인쇄 할 때 출처를 알려주십시오.

침해가 발생한 경우 연락 주시기 바랍니다[email protected] 삭제

에서 수정2021-06-8

몇 마디 만하겠습니다

0리뷰

로그인참여 후 검토

Related 관련 기사

기사

ggplot의 geom_bar에서 가로 막대 색상 지정

ggplot의 geom_bar에서 가로 막대 색상 지정

ggplot geom_bar () 플롯에서 막대를 채색하지 않음

ggplot R의 geom_bar에서 불연속 값에 대한 사용자 정의 색상

ggplot barplot에서 막대 색상 지정

geom_bar ggplot2에서 색상을 변경하는 방법, IFelse가 작동하지 않음

총 누적 막대 값으로 ggplot geom_bar 레이블 지정

ggplot : 막대가 많은 geom_bar

R에서 ggplot / geom_bar를 사용하여 막대 위에 데이터 세트의 사용자 지정 레이블을 추가하는 방법은 무엇입니까?

색상 막대 MATLAB에서 색상 사용자 정의

ggplot geom_bar 조건에 따라 별도의 색상으로 연속 색상 채우기

Achartengine, 막대 차트의 막대에 다른 색상 설정

값에 따라 색상이 지정된 막대가있는 Highcharts 막대 차트

R에서 ggplot 막대 그래프의 막대 색상 변경

y-log 스케일에서 무한 값 변환으로 인한 이상한 geom_bar 오차 막대

geom_bar의 막대 너비가 동일하지 않습니다.

그룹화 된 막대 그래프 ggplot에서 막대 색상을 사용자 정의 하시겠습니까?

카운트 플롯의 geom_bar : 값이없는 열에 대해 x 축 레이블을 추가하고 나머지 막대의 순서를 사용자 지정합니다.

값의 독립성이있는 세로 막 대형 차트에서 두 가지 색상을 번갈아 표시

ggplot 가로 막대 그래프에서 날짜 형식 지정

ggplot 가로 막대 그래프에서 날짜 형식 지정

누적 된 geom_col 플롯의 최대 값에 geom_point 추가-변수 결과로 색상 지정

R의 테이블 플롯에서 막대 색상을 지정하는 방법

Seaborn에서 색상 막대 사용자 정의-히트 맵

proc sgplot vbar에서 특정 막대의 색상 변경

proc sgplot vbar에서 특정 막대의 색상 변경

R ggplot2 막대 차트 특정 막대의 색상 변경

x 값당 2 개의 막대가있는 누적 geom_bar ()

지도에서 동적으로 색상 막대 생성

ggplot2에서 백분율 막대의 색상 변경

누적 막대 플롯의 막대를 다른 색상으로 만들기 ggplot