如何在 R 中将数字拆分成各个数字?
为了在 R 中将数字拆分成各个数字,我们可以使用 `strsplit` 函数,先将数字读取为字符类型(使用 `as.character`),然后将输出读取为数值类型(使用 `as.numeric`)。
例如,如果我们有一个存储在名为 X 的对象中的数字,那么我们可以使用以下命令将存储在 X 中的数字拆分成各个数字:
as.numeric(strsplit(as.character(X),"")[[1]])
示例 1
要在 R 中将数字拆分成各个数字,请使用以下代码片段:
x1<-2547435 x1
如果您执行以上代码片段,则会生成以下输出:
[1] 2547435
要在 R 中将数字拆分成各个数字,请将以下代码添加到上述代码片段中:
x1<-2547435 as.numeric(strsplit(as.character(x1),"")[[1]])
输出
如果您将以上所有代码作为单个程序执行,则会生成以下输出:
[1] 2 5 4 7 4 3 5
Explore our latest online courses and learn new skills at your own pace. Enroll and become a certified expert to boost your career.
示例 2
要在 R 中将数字拆分成各个数字,请使用以下代码片段:
x2<-8789342355 x2
如果您执行以上代码片段,则会生成以下输出:
[1] 8789342355
要在 R 中将数字拆分成各个数字,请将以下代码添加到上述代码片段中:
x2<-8789342355 as.numeric(strsplit(as.character(x2),"")[[1]])
输出
如果您将以上所有代码作为单个程序执行,则会生成以下输出:
[1] 8 7 8 9 3 4 2 3 5 5
示例 3
要在 R 中将数字拆分成各个数字,请使用以下代码片段:
x3<-10000 x3
如果您执行以上代码片段,则会生成以下输出:
[1] 10000
要在 R 中将数字拆分成各个数字,请将以下代码添加到上述代码片段中:
x3<-10000 as.numeric(strsplit(as.character(x3),"")[[1]])
输出
如果您将以上所有代码作为单个程序执行,则会生成以下输出:
[1] 1 0 0 0 0
示例 4
要在 R 中将数字拆分成各个数字,请使用以下代码片段:
x4<-rpois(1,200) x4
如果您执行以上代码片段,则会生成以下输出:
[1] 207
要在 R 中将数字拆分成各个数字,请将以下代码添加到上述代码片段中:
x4<-rpois(1,200) as.numeric(strsplit(as.character(x4),"")[[1]])
输出
如果您将以上所有代码作为单个程序执行,则会生成以下输出:
[1] 2 0 7
示例 5
要在 R 中将数字拆分成各个数字,请使用以下代码片段:
x5<-47824135 x5
如果您执行以上代码片段,则会生成以下输出:
[1] 47824135
要在 R 中将数字拆分成各个数字,请将以下代码添加到上述代码片段中:
x5<-47824135 as.numeric(strsplit(as.character(x5),"")[[1]])
输出
如果您将以上所有代码作为单个程序执行,则会生成以下输出:
[1] 4 7 8 2 4 1 3 5
示例 6
要在 R 中将数字拆分成各个数字,请使用以下代码片段:
x6<-231404700 x6
如果您执行以上代码片段,则会生成以下输出:
[1] 231404700
要在 R 中将数字拆分成各个数字,请将以下代码添加到上述代码片段中:
x6<-231404700 as.numeric(strsplit(as.character(x6),"")[[1]])
输出
如果您将以上所有代码作为单个程序执行,则会生成以下输出:
[1] 2 3 1 4 0 4 7 0 0
示例 7
要在 R 中将数字拆分成各个数字,请使用以下代码片段:
x7<-00142452233 x7
如果您执行以上代码片段,则会生成以下输出:
[1] 142452233
要在 R 中将数字拆分成各个数字,请将以下代码添加到上述代码片段中:
x7<-00142452233 as.numeric(strsplit(as.character(x7),"")[[1]])
输出
如果您将以上所有代码作为单个程序执行,则会生成以下输出:
[1] 1 4 2 4 5 2 2 3 3
示例 8
要在 R 中将数字拆分成各个数字,请使用以下代码片段:
x8<-rpois(1,100032474) x8
如果您执行以上代码片段,则会生成以下输出:
[1] 100035562
要在 R 中将数字拆分成各个数字,请将以下代码添加到上述代码片段中:
x8<-rpois(1,100032474) as.numeric(strsplit(as.character(x8),"")[[1]])
输出
如果您将以上所有代码作为单个程序执行,则会生成以下输出:
[1] 1 0 0 0 3 5 5 6 2
示例 9
要在 R 中将数字拆分成各个数字,请使用以下代码片段:
x9<-rpois(1,2875662365) x9
如果您执行以上代码片段,则会生成以下输出:
[1] NA
要在 R 中将数字拆分成各个数字,请将以下代码添加到上述代码片段中:
as.numeric(strsplit(as.character(x9),"")[[1]])
输出
如果您将以上所有代码作为单个程序执行,则会生成以下输出:
[1] 2 8 7 5 6 7 2 5 3 2
示例 10
要在 R 中将数字拆分成各个数字,请使用以下代码片段:
x10<-rpois(1,924135746) x10
如果您执行以上代码片段,则会生成以下输出:
[1] 924151778
要在 R 中将数字拆分成各个数字,请将以下代码添加到上述代码片段中:
x10<-rpois(1,924135746) as.numeric(strsplit(as.character(x10),"")[[1]])
输出
如果您将以上所有代码作为单个程序执行,则会生成以下输出:
[1] 9 2 4 1 5 1 7 7 8