R 语言 饼图

  • R 语言 饼图

    R编程语言具有大量的库来创建图表。饼图是值的表示形式,是具有不同颜色的圆的切片。切片被标记,并且每个切片对应的数字也显示在图表中。
    在R中,使用pie()函数创建饼形图,该函数将正数作为向量输入。附加参数用于控制标签,颜色,标题等。
    使用R创建饼图的基本语法是-
    
    pie(x, labels, radius, main, col, clockwise)
    
    以下是所用参数的描述-
    • x - 是一个向量,其中包含饼图中使用的数值。
    • labels - 用于对切片进行描述。
    • radius - 表示饼图的圆的半径。(值介于-1和+1之间)。
    • main - 表示图表标题。
    • col - 表示调色板。
    顺时针是一个逻辑值,指示切片是顺时针还是逆时针绘制。
    仅使用输入向量和标签即可创建一个非常简单的饼图。下面的脚本将创建饼形图并将其保存在当前的R工作目录中。
    
    # Create data for the graph.
    x <- c(21, 62, 10, 53)
    labels <- c("London", "New York", "Singapore", "Mumbai")
    
    # Give the chart file a name.
    png(file = "city.png")
    
    # Plot the chart.
    pie(x,labels)
    
    # Save the file.
    dev.off()
    
    当我们执行以上代码时,它产生以下结果-
    pie
  • 饼图标题和颜色

    我们可以通过向函数添加更多参数来扩展图表的功能。我们将使用main参数向图表添加标题,另一个参数为col,它将在绘制图表时使用彩虹色托盘。托盘的长度应与图表中的值相同。因此,我们使用length(x)。
    下面的脚本将创建饼形图并将其保存在当前的R工作目录中。
    
    # Create data for the graph.
    x <- c(21, 62, 10, 53)
    labels <- c("London", "New York", "Singapore", "Mumbai")
    
    # Give the chart file a name.
    png(file = "city_title_colours.jpg")
    
    # Plot the chart with title and rainbow color pallet.
    pie(x, labels, main = "City pie chart", col = rainbow(length(x)))
    
    # Save the file.
    dev.off()
    
    当我们执行以上代码时,它产生以下结果-
    pie
  • 切片百分比和图表图例

    我们可以通过创建其他图表变量来添加切片百分比和图表图例。
    
    # Create data for the graph.
    x <-  c(21, 62, 10,53)
    labels <-  c("London","New York","Singapore","Mumbai")
    
    piepercent<- round(100*x/sum(x), 1)
    
    # Give the chart file a name.
    png(file = "city_percentage_legends.jpg")
    
    # Plot the chart.
    pie(x, labels = piepercent, main = "City pie chart",col = rainbow(length(x)))
    legend("topright", c("London","New York","Singapore","Mumbai"), cex = 0.8,
       fill = rainbow(length(x)))
    
    # Save the file.
    dev.off()
    
    当我们执行以上代码时,它产生以下结果-
    pie
  • 3D饼图

    可以使用其他程序包绘制3维尺寸的饼图。包plotrix具有一个称为pie3D()的函数,用于此功能。
    
    # Get the library.
    library(plotrix)
    
    # Create data for the graph.
    x <-  c(21, 62, 10,53)
    lbl <-  c("London","New York","Singapore","Mumbai")
    
    # Give the chart file a name.
    png(file = "3d_pie_chart.jpg")
    
    # Plot the chart.
    pie3D(x,labels = lbl,explode = 0.1, main = "Pie Chart of Countries ")
    
    # Save the file.
    dev.off()
    
    当我们执行以上代码时,它产生以下结果-
    pie