如何在R中将数字拆分为数字？

2024-05-21 22:44:04 186

要将数字拆分为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

示例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

如何在R中将数字拆分为数字？

示例1

示例2

示例3

示例4

例5

例6

例7

例8

例9

例10

热门推荐

随机推荐