转换二进制的串入数据矩阵中的R

我怎样才能顺序M对12由数字的米矩阵（例如每单元一个比特）：转换二进制的串入数据矩阵中的R

library(R.utils) 
m<-5  
k<-12 
W<-sample(1:(2**m),k) 
M<-matrix(intToBin(V),k,1)

来源

2013-01-10 user189035

intToBin正在恢复的字符，所以使用strsplit投入矩阵之前将其拆分成单独的位（比特）。

m <- 5 
k <- 12 
W <- sample(1:(2**m), k) 
M <- matrix(as.numeric(unlist(strsplit(intToBin(W), ""))), nrow= k, byrow = TRUE) 
> M 
     [,1] [,2] [,3] [,4] [,5] [,6] 
[1,] 1 0 0 0 0 0 
[2,] 0 1 1 0 0 0 
[3,] 0 0 0 1 1 0 
[4,] 0 1 0 0 1 1 
[5,] 0 1 0 1 1 0 
[6,] 0 1 1 1 0 0 
[7,] 0 0 0 0 0 0 
[8,] 0 1 1 1 1 0 
[9,] 1 1 0 1 0 1 
[10,] 1 0 0 1 1 1 
[11,] 0 0 1 1 1 1 
[12,] 0 0 1 1 0 1

来源

2013-01-10 23:31:35 Gregor

哎，你应该增加一个选项byrow = TRUE到矩阵（），也不会像广告:) – user189035

工作@ user189035良好的渔获！ – Gregor

intToBin将返回的字符串二进制表示。

您可以拆分该字符串，转换为整数，然后合并行。

M<-do.call(rbind, lapply(strsplit(intToBin(W),''), as.integer))

来源

2013-01-10 23:30:45 mnel

转换二进制的串入数据矩阵中的R

回答

相关问题