如何在 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

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

更新於: 2021年11月9日

4K+ 瀏覽量

啟動您的 職業生涯

透過完成課程獲得認證

開始學習
廣告