如何基于R中的多个变量创建数据表？

Question

我根据分位数功能创建了6个变量（我在默认数量'0.25，.5和.75'的基础上创建了不同的分位数。我想创建一个与以下输出类似的汇总表，我的变量，我们将不胜感激。

我使用cbind将所有变量合并到一个表中，但是格式不正确。

ten_quantile = quantile(tt$HPTACC, probs = .1)
twenty_quantile = quantile(tt$HPTACC, probs = .2)
thirty_quantile = quantile(tt$HPTACC, probs = .3)
med = quantile(tt$HPTACC, probs = .5)
sixty_quantile = quantile(tt$HPTACC, probs = .6)
upper = quantile(tt$HPTACC, probs = .75)


rr <- cbind(ten_quantile, twenty_quantile, thirty_quantile, med, sixty_quantile, upper)
rr

ten_quantile twenty_quantile thirty_quantile   med sixty_quantile   upper
10%       7172.1        17137.72         22099.3 29542          32302 35864.5

但是我想有这样的东西，但还有额外的分位数：

Sfttime <- quantile(tt$HPTACC)


## Create quantile soft time into df ##
SummaryTable <- data.frame(
  Sfttime)

      Sfttime
0%        0.00
10%   #
20%   #
25%   20072.25
35%   #
50%   29542.00
60%   #
75%   35864.50
100% 889368.00

Answer 1

我认为您可以使用Quantile（）函数。 您可以在probs参数中配置值。 我将以mtcars为例，但它应该可以处理您的数据

QuantData <- quantile(mtcars$drat)
QuantData <- as.data.frame(QuantData)

Result <- data.frame(Quantile = row.names(QuantData), 
                     Value = QuantData[,1])

QuantData <- quantile(mtcars$drat, 
                      probs = c(0,0.1,0.20,0.25,0.35,0.5,0.6,0.75,1))
QuantData <- as.data.frame(QuantData)

Result <- data.frame(Quantile = row.names(QuantData), 
                     Value = QuantData[,1])

Answer 2

最简单的答案是使用dplyr的框架：

quantile(tt$HPTACC, c(0,0.1,0.20,0.25,0.35,0.5,0.6,0.75,1)) %>% 
  enframe(name = "quantile")

以mtcar的mpg为例，它产生以下输出：

> quantile(mtcars$mpg, c(0,0.1,0.20,0.25,0.35,0.5,0.6,0.75,1)) %>% 
+   enframe(name = "quantile")
# A tibble: 9 x 2
  quantile value
  <chr>    <dbl>
1 0%        10.4
2 10%       14.3
3 20%       15.2
4 25%       15.4
5 35%       17.2
6 50%       19.2
7 60%       21  
8 75%       22.8
9 100%      33.9