R 我怎样计算矩阵中的数字
我有一个带数字和NA的矩阵。 我想把这个矩阵显示为R 我怎样计算矩阵中的数字,r,count,numbers,R,Count,Numbers,我有一个带数字和NA的矩阵。 我想把这个矩阵显示为 N09 V1 V2 V3 V4 V5 V6 V7 V8 V9 V10 V11 1 0 7 0 0 0 9 NA NA NA NA NA 2 0 7 7 8 0 9 NA NA NA NA NA 3 0 8 11 7 7 9 NA NA NA NA NA 4 0 7 0 1 1 9 NA NA NA NA NA 5 0 3 3 3 11 9 NA NA NA NA
N09
V1 V2 V3 V4 V5 V6 V7 V8 V9 V10 V11
1 0 7 0 0 0 9 NA NA NA NA NA
2 0 7 7 8 0 9 NA NA NA NA NA
3 0 8 11 7 7 9 NA NA NA NA NA
4 0 7 0 1 1 9 NA NA NA NA NA
5 0 3 3 3 11 9 NA NA NA NA NA
6 0 7 7 7 7 9 NA NA NA NA NA
7 0 4 0 0 0 9 NA NA NA NA NA
8 0 1 0 7 1 9 NA NA NA NA NA
9 0 1 0 0 0 9 NA NA NA NA NA
10 0 0 6 8 7 9 NA NA NA NA NA
11 0 0 1 1 0 9 NA NA NA NA NA
例如:
9 to : 1 1 3 1
10 to : 2 1 1 1 1
我该怎么办?试试看
lst <- apply(N09, 1, function(x) unname(rle(x[!is.na(x)])$lengths))
lst[9:10]
#$`9`
#[1] 1 1 3 1
#$`10`
#[1] 2 1 1 1 1
数据
再给我们一些细节。如何从输入中导出底部示例?
str1 <- paste(seq_along(lst), 'to :', unname(sapply(lst, paste, collapse=' ')))
str1[9:10]
#[1] "9 to : 1 1 3 1" "10 to : 2 1 1 1 1"
N09 <- structure(c(0L, 0L, 0L, 0L, 0L, 0L, 0L, 0L, 0L, 0L, 0L, 7L, 7L,
8L, 7L, 3L, 7L, 4L, 1L, 1L, 0L, 0L, 0L, 7L, 11L, 0L, 3L, 7L,
0L, 0L, 0L, 6L, 1L, 0L, 8L, 7L, 1L, 3L, 7L, 0L, 7L, 0L, 8L, 1L,
0L, 0L, 7L, 1L, 11L, 7L, 0L, 1L, 0L, 7L, 0L, 9L, 9L, 9L, 9L,
9L, 9L, 9L, 9L, 9L, 9L, 9L, NA, NA, NA, NA, NA, NA, NA, NA, NA,
NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA,
NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA,
NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA), .Dim = c(11L,
11L), .Dimnames = list(c("1", "2", "3", "4", "5", "6", "7", "8",
"9", "10", "11"), c("V1", "V2", "V3", "V4", "V5", "V6", "V7",
"V8", "V9", "V10", "V11")))