小编Ril*_*ley的帖子

我有一个28变量的数据框，并且我想用相同的功能对同一数据框中的每个变量进行突变。例如，为数据框中的每个变量添加一个额外的列，其中新列是变量的日志。例如，如果我有

dataframe <- data.frame(X=data1, Y=data2, Z=data3)

我想要一个包含XY和Z以及log（X），log（Y）和log（Z）的新数据框。这很容易使用

mutate(dataframe, log(X)); mutate(dataframe(log(Y))

等等，但是对于28个变量（以及每个变量的多次转换-我也想获得sqrt和^ 2）有点太多了。我知道mutate_all的存在，但是由于某些原因，当我尝试使用mutate_all时，它将替换所有变量，而不是添加新变量。

我正在尝试制作一个饼图来分解 3 个不同类别之间的值拆分（是的，我知道堆叠条形图会更好，但我真的没有选择）。我想出了如何在堆积条形图上使用 +coord_polar 制作饼图，并隐藏刻度/轴标签，但我需要在饼图的每个切片中包含实际值以及总数的百分比，并且我不知道该怎么做。这是我正在使用的代码（我使用的数据是机密的，所以我用一些模拟数据替换了它）。

library(ggplot2)

simuldata <- data.frame(Category = LETTERS[1:3], 
                        value = c(196, 149,127))

piechart <- ggplot(simuldata, aes(x="", y=value, fill=Category)) +
  geom_bar(width=1, stat="identity") +
  coord_polar("y", start=0) +
  xlab("") +
  ylab("Value") +
  theme(axis.text.x=element_blank(),axis.ticks.x=element_blank())

piechart

我将如何将值和百分比添加到每个切片？