R语言之可视化⑧easyGgplot2散点图续

目录

R语言之可视化①误差棒

R语言之可视化②点图

R语言之可视化③点图续

R语言之可视化④点韦恩图upsetR

R语言之可视化⑤R图形系统

R语言之可视化⑥R图形系统续

R语言之可视化⑦easyGgplot2散点图

R语言之可视化⑧easyGgplot2散点图续

======================================

  • 根据组更改条形图颜色

可以将颜色指定为十六进制RGB三元组,例如“#FFCC00”或名称。还可以使用其他颜色比例,例如从RColorBrewer包中提取的颜色比例。 这里已经详细描述了R中可用的不同颜色系统。
要根据组更改条形图颜色,必须使用参数groupName指定包含组的数据列的名称。 使用参数groupColors,通过十六进制代码或名称指定颜色。 在这种情况下,groupColors的长度应该与组的数量相同。 使用参brewerPalette,使用RColorBrewerpalette指定颜色。

# Color the stripchart accoording to the groupName "dose"
ggplot2.stripchart(data=df, xName='dose',yName='len',
        groupName='dose')
# Change group colors using hexadecimal colors
ggplot2.stripchart(data=df, xName='dose',yName='len',
        groupName='dose',
        groupColors=c('#999999','#E69F00','#56B4E9'))
# Change group colors using brewer palette: "Paired"
ggplot2.stripchart(data=df, xName='dose',yName='len',
        groupName='dose',brewerPalette="Paired")
# Change group colors using color names
ggplot2.stripchart(data=df, xName='dose',yName='len',
      groupName='dose',
      groupColors=c('aquamarine3','chartreuse1','goldenrod1'))
  • 标注/位置
# Change the legend position to "top" 
  # (possible values: "left","top", "right", "bottom")
ggplot2.stripchart(data=df, xName='dose',yName='len',
        groupName='dose', legendPosition="top")
# legendPosition can be also a numeric vector c(x, y)
ggplot2.stripchart(data=df, xName='dose',yName='len',
        groupName='dose', legendPosition=c(0.8,0.2))
  • 标注背景边框
# Change legend background color, title and text font styles
ggplot2.stripchart(data=df, xName='dose',yName='len',
    groupName='dose',
    #legendTitleFont=c(size, style, color)
    legendTitle="Dose (mg)", legendTitleFont=c(10, "bold", "blue"),
    #legendTextFont=c(size, style, color)
    legendTextFont=c(10, "bold.italic", "red"),
    #legendBackground: c(fill, lineSize, lineType, lineColor)
    legendBackground=c("lightblue", 0.5, "solid", "darkblue" )
    )
  • 隐藏标注
# Change the order of items in the legend
 # legendItemOrder : character vector indicating 
# the order of items in the legends.
ggplot2.stripchart(data=df, xName='dose',yName='len',
            groupName='dose',
            legendItemOrder=c("2", "1", "0.5"))
# Remove plot legend
ggplot2.stripchart(data=df, xName='dose',yName='len',
              groupName='dose', showLegend=FALSE)
  • 坐标轴
# Change y axis limit
ggplot2.stripchart(data=df, xName='dose',yName='len',
                groupName='dose', ylim=c(0,50))
# y Log scale. yScale="log2". 
# Possible value="none", "log2" and "log10"
ggplot2.stripchart(data=df, xName='dose',yName='len',
              groupName='dose', yScale="log2")
# Customized stripchart
ggplot2.stripchart(data=df, xName='dose',yName='len',
    groupName='dose',
    groupColors=c('#999999','#E69F00','#56B4E9'), showLegend=FALSE,
    backgroundColor="white", xtitle="Dose (mg)", ytitle="length", 
    mainTitle="Plot of length \n by dose")
# Customized stripchart with notched box plot
# Remove grid; Remove Top and right border around the plot
ggplot2.stripchart(data=df, xName='dose',yName='len',
    groupName='dose',
    groupColors=c('#999999','#E69F00','#56B4E9'), showLegend=FALSE,
    backgroundColor="white", xtitle="Dose (mg)", ytitle="length", 
    mainTitle="Plot of length \n by dose",
    addBoxplot=TRUE, notch=TRUE,
    removePanelGrid=TRUE,removePanelBorder=TRUE,
    axisLine=c(0.5, "solid", "black"))
# Customized stripchart, change point color, 
# fill box plot accoording to the groups
#Change the color of points to "black"
ggplot2.stripchart(data=df, xName='dose',yName='len',
    groupName='dose',
    groupColors=c('#999999','#E69F00','#56B4E9'), showLegend=FALSE,
    backgroundColor="white", xtitle="Dose (mg)", ytitle="length", 
    mainTitle="Plot of length \n by dose",
    addBoxplot=TRUE, boxplotFill=NULL, notch=TRUE, colour="black")
# Customized stripchart, add box plot, pink fill color.
# Change the color of points to "black"
ggplot2.stripchart(data=df, xName='dose',yName='len',
    groupName='dose',
    groupColors=c('#999999','#E69F00','#56B4E9'), showLegend=FALSE,
    backgroundColor="white", xtitle="Dose (mg)", ytitle="length", 
    mainTitle="Plot of length \n by dose",
    addBoxplot=TRUE, boxplotFill="pink", colour="black")
# Customized stripchart, add box plot, 
#fill box plot accoording to the groups.
ggplot2.stripchart(data=df, xName='dose',yName='len',
    groupName='dose',
    groupColors=c('#999999','#E69F00','#56B4E9'),
    showLegend=FALSE,
    backgroundColor="white", xtitle="Dose (mg)", ytitle="length", 
    mainTitle="Plot of length \n by dose",
    addBoxplot=TRUE, boxplotFill=NULL, colour="black")
# plot of variable 'len' by xName 'dose'. The plot is colored by the groupName 'supp'
# position = interval between dot plot of the same group
ggplot2.stripchart(data=df, xName='dose',yName='len',
      groupName='supp', 
      position=position_jitter(0.2), 
      backgroundColor="white", 
      groupColors=c('#999999','#E69F00')
)  
 
# Change the interval between stripchart of the same group:
  # position = interval between dot plot of the same group
ggplot2.stripchart(data=df, xName='dose',yName='len',
      groupName='supp', 
      position=position_dodge(0.8), 
      backgroundColor="white", groupColors=c('#999999','#E69F00'))
# Change the interval between stripchart of the same group
#position=position_dodge(0.8), add box plot
ggplot2.stripchart(data=df, xName='dose',yName='len',
      groupName='supp', 
      position=position_dodge(0.8), 
      backgroundColor="white", groupColors=c('#999999','#E69F00'),
      addBoxplot=TRUE, boxplotFill="white")

推荐阅读更多精彩内容