2013-12-13 255 views
1

我已經閱讀了很多關於更改標籤命令的知識,但我似乎沒有在我的圖中正確地獲取它們。在ggplot2中更改軸標籤名稱

我想將y軸標籤從「HeartRate」更改爲「心率(節拍/分鐘)」。

這是我的命令:

df <- data.frame(
    Phase = factor(c(0, 0, 1, 1, 2, 2, 3, 3, 4, 4, 5, 5, 6, 6, 7, 7, 8, 8, 9, 9)), 
    HeartRate = c(67, 70, 70, 73, 82, 83, 104, 106, 73, 86, 74, 65, 86, 82, 94, 108, 73, 81, 67, 68), 
    group = factor(c("female", "male", "female", "male", "female", "male", "female", "male", "female", "male", "female", "male", "female", "male", "female", "male", "female", "male", "female", "male")), 
    se = c(4, 7, 4, 9, 5, 9, 8, 14, 6, 15, 3, 6, 6, 9, 4, 14, 3, 8, 4, 5) 
) 


limits <- aes(ymax = HeartRate + se, ymin=HeartRate - se)  
p <- ggplot(df, aes(fill=group, y=HeartRate, x=Phase)) 
p + geom_bar(position="dodge", stat="identity")  
limits <- aes(ymax = HeartRate + se, ymin=HeartRate - se)  
p <- ggplot(df, aes(fill=group, y=HeartRate, x=Phase, title="Gender differences in Heart Rate")) 
p + geom_bar(position="dodge", stat="identity")  
dodge <- position_dodge(width=0.9)  
p + geom_bar(position=dodge) + geom_errorbar(limits, position=dodge, width=0.25) 

我什麼都試過,但我只是似乎沒有得到它的權利。 :(

回答

1

添加代碼的最後一行:

scale_y_continuous("Heart Rate (beats/min)") 

這將是這樣的:

p + geom_bar(position=dodge) + geom_errorbar(limits, position=dodge, width=0.25) + scale_y_continuous("Heart Rate (beats/min)") 

enter image description here

+1

非常感謝你,安德烈!非常感謝! ! – user3037974