Scatterplot : 축 레이블에 색을 붙이고 이탤릭체로 표시

Question

(R 산점도) Y 축 라벨 색상을 지정하고 굵게 표시하고 다른 부분은 기울임 꼴로 표시하고 싶습니다. 나는 textA이 대담하고 색 (적색) 할 수있는 방법과 :

png("test.png", height=800, width=600, pointsize=15) 
par(mar=c(5,12,.25,1)) 
textA=seq(0,100,25) 
textB=c("start","intermediate1","intermediate2","intermediate3","stop") 
plot(c(0,runif(8),1),c(0,runif(8),1),axes=F,ylab=NA) 
axis(1) 
axis(2, at=seq(0,1,.25), labels=paste(textA,"-",textB,sep=""),las=2,cex.axis=1.5) 
dev.off() 

질문 : 나는 글꼴, 굵은 기울임 꼴 만들고 그것을 색상을 제공 제외하고, 모든 것이 이루어집니다 매우 간단한 플로팅 스크립트에서 시작 동시에 textB를 굵은 체의 표준 색상 (검은 색)이 아닌 기울임 체로 만듭니다.

고마워요.

Answer 1

난 후, textA 및 textB 모두 axis를 사용하면 때까지 line 함께 놀러 것을 허용되는 간격.

편집 : 레이블 안에 다른 색상과 글꼴을 갖는 방법을 모르겠습니다. 이 문제를 해결하기 위해 변수 x 위치와 함께 text을 사용하여 두 텍스트를 밀접하게 배치 할 수 있습니다. 창 크기를 조정하면 오프셋을 조정해야 할 수도 있습니다. 이것으로 찾고에 대한

par(mar=c(5,13,.25,1)) 
textA=seq(0,100,25) 
textB=c("start","intermediate1","intermediate2","intermediate3","stop") 
plot(c(0,runif(8),1),c(0,runif(8),1),axes=F,ylab=NA) 
axis(1) 

# add textA and textB 
axis(2, at=seq(0,1,.25), labels=textB, font=3, col.axis=1,las=2,cex.axis=1.5, line=1) 
text(x=c(-0.3,-0.55,-0.55,-0.55,-0.3), y=seq(0,1,.25), textA, xpd=NA, col=2, font=2, cex=1.5) 

# check which offset we need for textA: 
# abline(v=seq(-1,0,.1), xpd=NA, col=2) 
# text(,x=seq(-1,0,.1),y=rep(0,11),labels=seq(-1,0,.1),xpd=NA) 

는

Answer 2

나는 ggplot2와 함께 다음과 같은 것을 할 것 :

# create a dataframe 
x <- c(0,runif(8),1) 
y <- c(0,runif(8),1) 
df <- as.data.frame(cbind(x, y)) 

# loading ggplot2 package 
require(ggplot2) 

# creating the plot 
ggplot(df, aes(x=x, y=y)) + 
    geom_point(shape = 21, size = 4) + 
    scale_x_continuous("x-axis-label") + 
    scale_y_continuous("", breaks=c(0,0.25,0.50,0.75,1.00), 
        labels=c("start","intermediate1","intermediate2","intermediate3","stop")) + 
    theme_classic() + 
    theme(axis.text.x = element_text(size=14, face="italic"), 
     axis.text.y = element_text(size=14, colour = "red", face="bold"), 
     axis.title.x = element_text(vjust=-1)) 

결과 :