R中的创建频率

Question

具有此向量的值：

 [1] 0.9324929 0.9461874 0.9899430 0.8592746 0.9495612 1.0047946 0.9501648 0.8826660 0.9297847
 [10] 0.9540155 0.9096408 0.9808021 0.9641611 0.9327183 0.9893001 0.9998917 0.8869922 1.0003532
 [19] 0.9934479 0.9547312 0.9376618 0.9911494 0.9544154 0.9626668 0.9733901 0.9406843 0.9781659
 [28] 0.9691705 0.9860182 0.9110487 0.9248749 0.9941826 0.9268455 0.9975929 0.9382284 0.9718256
 [37] 0.9540453 0.9849839 0.9814700 0.9745441 0.9785246 0.9801577 0.8183103 0.9939775 0.9872761
 [46] 1.0038558 0.9343682 0.9491356 0.9022990 0.9682440 0.9772953 0.9686033 1.0102170 0.9819136
 [55] 0.9379499 0.9581504 0.9434762 0.9587864 0.8591005 0.9537204 0.8371453 0.9970909 0.9727121
 [64] 0.9366303 0.9940191 0.9455938 0.9600928 0.9659665 0.9834040 0.7780706 0.9629880 0.9862824
 [73] 0.8911732 0.9908817 0.9618327 0.9399749 0.9856844 1.0088414 0.9585859 0.9633556 0.9364963
 [82] 0.9302964 0.9712584 0.9875152 0.8663259 0.9486364 0.9416057 0.9331992 0.9006658 0.9704888
 [91] 0.9763257 0.9785422 0.9794852 1.0041416 0.9897161 0.9402995 0.9772260 0.9663181 0.9785556
[100] 0.9025224

知道我想用这个值seq（0.76,1.16,0.02）面对它并创建频率表。我在excel中做了同样的事情，这就是结果：

Bins    Frequency
0,76    0%
0,78    1%
0,80    0%
0,82    1%
0,84    1%
0,86    2%
0,88    1%
0,90    3%
0,92    5%
0,94    14%
0,96    18%
0,98    25%
1,00    23%
1,02    6%
1,04    0%
1,06    0%
1,08    0%
1,10    0%
1,12    0%
1,14    0%
1,16    0%

我在excel中使用的函数是= FREQUENcy（L2：DG2; A2：A22）/Count.Number（L2：DG2）。有人可以帮我复制R

Answer 1

这里是一种方法：

values <- c(0.9324929, 0.9461874, 0.9899430, 0.8592746, 0.9495612, 1.0047946, 0.9501648, 0.8826660, 0.9297847
, 0.9540155, 0.9096408, 0.9808021, 0.9641611, 0.9327183, 0.9893001, 0.9998917, 0.8869922, 1.0003532
, 0.9934479, 0.9547312, 0.9376618, 0.9911494, 0.9544154, 0.9626668, 0.9733901, 0.9406843, 0.9781659
, 0.9691705, 0.9860182, 0.9110487, 0.9248749, 0.9941826, 0.9268455, 0.9975929, 0.9382284, 0.9718256
, 0.9540453, 0.9849839, 0.9814700, 0.9745441, 0.9785246, 0.9801577, 0.8183103, 0.9939775, 0.9872761
, 1.0038558, 0.9343682, 0.9491356, 0.9022990, 0.9682440, 0.9772953, 0.9686033, 1.0102170, 0.9819136
, 0.9379499, 0.9581504, 0.9434762, 0.9587864, 0.8591005, 0.9537204, 0.8371453, 0.9970909, 0.9727121
, 0.9366303, 0.9940191, 0.9455938, 0.9600928, 0.9659665, 0.9834040, 0.7780706, 0.9629880, 0.9862824
, 0.8911732, 0.9908817, 0.9618327, 0.9399749, 0.9856844, 1.0088414, 0.9585859, 0.9633556, 0.9364963
, 0.9302964, 0.9712584, 0.9875152, 0.8663259, 0.9486364, 0.9416057, 0.9331992, 0.9006658, 0.9704888
, 0.9763257, 0.9785422, 0.9794852, 1.0041416, 0.9897161, 0.9402995, 0.9772260, 0.9663181, 0.9785556
, 0.9025224)

v <- round(values,digits=2)
vPct <- prop.table(v)

results <- unique(data.frame(Bins=v,Frequency=vPct))
results[order(results$Bins),]