如何舍入R中比例表中的值？

• Z时代
• 2024-01-10
• 分类：综合

要在R中对比例表中的值进行四舍五入，我们可以先将比例表保存在一个对象中，然后使用round函数。

例如，如果我们有一个向量说 X，那么我们可以使用 prop.table( table(X))为 X 中的数据创建一个比例表并将其存储在一个名为 Tab 的对象中，然后使用以下给定的命令将值四舍五入到两位小数-

round(Tab,2)

示例 1

以下代码段创建了一个示例数据框 -

x1<-rpois(200,5)
x1

创建以下数据框 -

[1] 7 9 1 6 1 5 5 10 5 6 2 3 3 7 6 5 7 0 4 4 6 2 4 5 7
[26] 4 2 7 3 3 5 9 5 6 3 6 3 5 4 6 3 6 3 6 7 3 6 4 5 4
[51] 2 4 2 6 4 4 6 9 6 5 9 3 2 7 4 7 2 4 5 9 7 2 4 6 9
[76] 7 4 6 2 4 5 5 7 8 5 9 6 5 8 9 2 6 7 2 3 3 4 5 3 2
[101] 9 7 3 8 7 4 7 2 7 6 5 4 2 3 2 6 7 1 3 4 3 7 7 3 7
[126] 6 3 2 10 4 10 3 3 3 10 6 6 3 6 3 5 6 3 4 4 1 2 6 5 7
[151] 4 5 1 8 2 6 1 5 4 4 5 7 5 3 2 3 7 6 7 6 8 6 2 7 4
[176] 3 3 5 4 7 4 5 10 8 2 4 6 6 7 4 7 2 6 9 4 3 6 5 4 3

将以下代码添加到上述代码段中 -

x1<-rpois(200,5)
table1<-prop.table(table(x1))
table1

如果您将上述所有给定的片段作为单个程序执行，它会生成以下输出 -

x1
   0    1     2     3      4     5    6     7     8     9    10
0.005 0.030 0.110 0.155 0.160 0.130 0.165 0.140 0.030 0.050 0.025

将以下代码添加到上述代码段中 -

x1<-rpois(200,5)
table1<-prop.table(table(x1))
round(table1,2)

如果您将上述所有给定的片段作为单个程序执行，它会生成以下输出 -

x1
  0    1    2    3    4    5    6    7    8    9   10
0.00 0.03 0.11 0.16 0.16 0.13 0.16 0.14 0.03 0.05 0.03

示例 2

以下代码段创建了一个示例数据框 -

x2<-rpois(200,1)
x2

创建以下数据框 -

[1] 0 0 0 2 0 1 1 0 1 1 1 3 0 2 0 0 0 2 1 0 2 0 2 2 1 1 1 2 2 0 3 0 1 0 1 1 1
[38] 1 1 2 2 0 3 0 1 0 1 0 0 3 1 0 2 0 1 0 3 4 1 2 0 2 0 0 1 1 1 0 0 0 2 1 0 2
[75] 1 1 3 1 1 0 1 0 2 1 0 0 4 1 3 0 0 0 1 2 0 1 1 2 0 0 2 0 1 0 1 1 2 3 0 1 1
[112] 1 1 0 4 2 0 0 1 0 2 1 1 4 2 3 0 0 0 0 0 1 0 1 1 1 1 1 0 1 4 1 2 1 0 0 0 0
[149] 2 1 0 1 1 1 2 2 3 3 2 0 3 0 2 0 0 0 1 0 3 0 1 1 3 2 3 0 2 1 1 1 1 0 0 0 0
[186] 0 2 0 3 3 0 1 0 0 0 3 3 0 0 1

将以下代码添加到上述代码段中 -

x2<-rpois(200,1)
table2<-prop.table(table(x2))
table2

如果您将上述所有给定的片段作为单个程序执行，它会生成以下输出 -

x2
  0      1     2     3    4
0.390 0.330 0.160 0.095 0.025

将以下代码添加到上述代码段中 -

x2<-rpois(200,1)
table2<-prop.table(table(x2))
round(table2,2)

如果您将上述所有给定的片段作为单个程序执行，它会生成以下输出 -

x2
   0  1     2    3   4
0.39 0.33 0.16 0.10 0.03

示例 3

以下代码段创建了一个示例数据框 -

x3<-rpois(200,10)
x3

创建以下数据框 -

[1] 8 6 8 5 8 5 9 9 13 13 15 12 13 9 10 9 7 8 8 9 15 9 11 10 4
[26] 12 9 13 14 7 9 7 9 5 11 9 12 13 10 10 4 11 9 16 12 8 8 10 9 10
[51] 14 11 17 10 11 13 5 13 16 16 11 14 16 9 3 8 8 5 4 10 8 9 12 9 8
[76] 8 14 3 10 15 8 18 11 8 10 5 5 7 10 10 11 8 10 10 16 8 11 12 13 11
[101] 13 13 6 14 9 6 9 5 8 12 12 10 10 12 5 19 7 6 9 6 5 13 10 11 9
[126] 8 7 14 12 8 11 14 14 9 7 13 5 9 11 8 12 8 16 13 11 7 17 10 12 15
[151] 11 13 10 18 13 5 8 8 16 8 9 9 8 14 4 13 9 7 14 6 10 10 12 14 10
[176] 7 13 9 4 9 12 10 14 3 14 10 8 11 7 12 10 12 9 5 6 9 10 9 12 5

将以下代码添加到上述代码段中 -

x3<-rpois(200,10)
table3<-prop.table(table(x3))
table3

如果您将上述所有给定的片段作为单个程序执行，它会生成以下输出 -

x3
  3      4    5     6     7     8     9     10   11    12    13    14    15
0.015 0.025 0.070 0.035 0.055 0.130 0.145 0.130 0.080 0.085 0.085 0.065 0.020
  16    17    18    19
0.035 0.010 0.010 0.005

将以下代码添加到上述代码段中 -

x3<-rpois(200,10)
table3<-prop.table(table(x3))
round(table3,2)

如果您将上述所有给定的片段作为单个程序执行，它会生成以下输出 -

x3
  3    4    5    6   7    8    9    10   11   12   13   14   15   16   17   18
0.01 0.03 0.07 0.04 0.06 0.13 0.14 0.13 0.08 0.09 0.09 0.06 0.02 0.04 0.01 0.01
19
0.00

示例 4

以下代码段创建了一个示例数据框 -

x4<-sample(0:2,200,replace=TRUE)
x4

创建以下数据框 -

[1] 0 0 2 0 0 1 0 2 2 2 0 2 2 2 0 2 0 0 2 0 2 0 1 2 1 2 0 2 1 1 0 1 2 2 1 1 1
[38] 2 1 2 2 1 0 2 2 0 2 0 1 1 1 0 2 2 1 1 0 0 2 0 2 1 0 2 1 2 1 1 1 2 0 2 2 0
[75] 1 1 1 1 1 0 2 0 0 2 0 2 2 1 0 0 2 1 1 2 0 2 1 0 2 2 1 1 1 0 2 2 1 2 0 0 1
[112] 2 2 1 1 1 1 2 0 1 1 1 0 0 2 2 1 1 1 2 0 0 0 1 2 0 1 0 1 2 0 2 2 1 1 2 0 1
[149] 2 1 1 1 1 0 2 1 2 0 1 2 0 0 2 0 1 2 2 0 2 2 0 0 0 2 1 2 1 0 0 1 1 2 0 2 1
[186] 0 1 0 2 0 1 2 0 0 1 1 2 2 2 0

将以下代码添加到上述代码段中 -

x4<-sample(0:2,200,replace=TRUE)
table4<-prop.table(table(x4))
table4

如果您将上述所有给定的片段作为单个程序执行，它会生成以下输出 -

x4
  0     1    2
0.310 0.335 0.355

将以下代码添加到上述代码段中 -

x4<-sample(0:2,200,replace=TRUE)
table4<-prop.table(table(x4))
round(table4,2)

如果您将上述所有给定的片段作为单个程序执行，它会生成以下输出 -

x4
  0    1   2
0.31 0.34 0.36

例 5

以下代码段创建了一个示例数据框 -

x5<-sample(rpois(3,5),200,replace=TRUE)
x5

创建以下数据框 -

[1] 4 7 4 4 7 3 4 7 4 4 4 3 7 3 4 7 3 3 7 4 7 7 3 3 4 7 7 4 7 4 3 3 4 3 3 3 4
[38] 7 3 3 7 4 4 4 3 7 4 3 3 7 7 3 7 4 4 7 7 3 4 4 4 4 3 3 3 4 3 3 4 4 7 7 4 4
[75] 3 7 4 4 7 4 7 3 4 3 7 3 3 4 7 3 4 3 3 3 7 4 7 3 4 4 7 7 3 4 7 3 3 7 3 7 7
[112] 7 4 4 7 7 4 3 7 3 3 3 7 3 4 4 3 3 4 7 3 4 7 4 4 4 3 3 7 3 4 3 7 4 4 3 7 3
[149] 4 3 7 4 3 4 7 4 4 4 4 3 3 4 3 3 4 3 4 7 7 7 4 3 4 4 3 7 7 4 4 3 4 3 3 3 7
[186] 7 7 3 4 3 7 3 4 3 7 4 4 7 3 4

将以下代码添加到上述代码段中 -

x5<-sample(rpois(3,5),200,replace=TRUE)
table5<-prop.table(table(x5))
table5

如果您将上述所有给定的片段作为单个程序执行，它会生成以下输出 -

x5
    3   4     7
0.350 0.365 0.285

将以下代码添加到上述代码段中 -

x5<-sample(rpois(3,5),200,replace=TRUE)
table5<-prop.table(table(x5))
round(table5,2)

如果您将上述所有给定的片段作为单个程序执行，它会生成以下输出 -

x5
  3    4    7
0.35 0.36 0.28

以上是 如何舍入R中比例表中的值？ 的全部内容， 来源链接： utcz.com/z/353540.html