如何将 R 中的长字符串拆分成大小相等的子字符串向量?


如果一个向量被错误地记录为一个单一的字符串,或者包含数据的文件没有以适当的方式分隔字符串,那么我们可能需要以正确的格式进行分隔,以便进行进一步分析。当因子变量的级别具有相等的名称长度且未分隔时,可能会发生这种情况。在这种情况下,我们可以使用 substring 函数将字符串拆分为包含大小相等子字符串的向量。

示例

看看这些示例,了解 substring 函数如何帮助我们将字符串拆分为子字符串向量 −

 实际演示

Factor<-"aabbccddabacadbabcbdcacbcddadbdc"
substring(Factor,seq(1,nchar(Factor),2),seq(2,nchar(Factor), 2))

输出

[1] "aa" "bb" "cc" "dd" "ab" "ac" "ad" "ba" "bc" "bd" "ca" "cb" "cd" "da" "db"
[16] "dc"
x1<-"abcdefghijklmopqrstuvwxyz"
substring(x1,seq(1,nchar(x1),2),seq(2,nchar(x1), 2))
[1] "ab" "cd" "ef" "gh" "ij" "kl" "mo" "pq" "rs" "tu" "vw" "xy" ""
substring(x1,seq(1,nchar(x1),2),seq(3,nchar(x1), 2))
[1] "abc" "cde" "efg" "ghi" "ijk" "klm" "mop" "pqr" "rst" "tuv" "vwx" "xyz"
[13] ""
substring(x1,seq(1,nchar(x1),3),seq(3,nchar(x1), 3))
[1] "abc" "def" "ghi" "jkl" "mop" "qrs" "tuv" "wxy" ""
substring(x1,seq(1,nchar(x1),4),seq(3,nchar(x1), 4))
[1] "abc" "efg" "ijk" "mop" "rst" "vwx" ""
substring(x1,seq(1,nchar(x1),4),seq(4,nchar(x1), 4))
[1] "abcd" "efgh" "ijkl" "mopq" "rstu" "vwxy" ""
substring(x1,seq(1,nchar(x1),4),seq(5,nchar(x1), 4))
[1] "abcde" "efghi" "ijklm" "mopqr" "rstuv" "vwxyz" ""
substring(x1,seq(1,nchar(x1),5),seq(5,nchar(x1), 5))
[1] "abcde" "fghij" "klmop" "qrstu" "vwxyz"
substring(x1,seq(1,nchar(x1),10),seq(5,nchar(x1), 10))
[1] "abcde" "klmop" "vwxyz"
substring(x1,seq(1,nchar(x1),10),seq(10,nchar(x1), 10))
[1] "abcdefghij" "klmopqrstu" ""
substring(x1,seq(1,nchar(x1),10),seq(2,nchar(x1), 10))
[1] "ab" "kl" "vw"
substring(x1,seq(1,nchar(x1),10),seq(3,nchar(x1), 10))
[1] "abc" "klm" "vwx"
substring(x1,seq(1,nchar(x1),10),seq(5,nchar(x1), 10))
[1] "abcde" "klmop" "vwxyz"
substring(x1,seq(1,nchar(x1),2),seq(2,nchar(x1)+2-1, 2))
[1] "ab" "cd" "ef" "gh" "ij" "kl" "mo" "pq" "rs" "tu" "vw" "xy" "z"
substring(x1,seq(1,nchar(x1),4),seq(4,nchar(x1)+4-1, 4))
[1] "abcd" "efgh" "ijkl" "mopq" "rstu" "vwxy" "z"
substring(x1,seq(1,nchar(x1),3),seq(4,nchar(x1)+4-1, 3))
[1] "abcd" "defg" "ghij" "jklm" "mopq" "qrst" "tuvw" "wxyz" "z"
substring(x1,seq(1,nchar(x1),5),seq(4,nchar(x1)+4-1, 5))
[1] "abcd" "fghi" "klmo" "qrst" "vwxy"
substring(x1,seq(1,nchar(x1),2),seq(4,nchar(x1)+4-1, 2))
[1] "abcd" "cdef" "efgh" "ghij" "ijkl" "klmo" "mopq" "pqrs" "rstu" "tuvw"
[11] "vwxy" "xyz" "z"
substring(x1,seq(1,nchar(x1),2),seq(5,nchar(x1)+5-1, 2))
[1] "abcde" "cdefg" "efghi" "ghijk" "ijklm" "klmop" "mopqr" "pqrst" "rstuv"
[10] "tuvwx" "vwxyz" "xyz" "z"

更新于: 2020 年 8 月 21 日

349 次浏览

开启你的 职业生涯

完成课程认证

立即开始
广告