Question

我正在进行社交网络分析任务，我需要从矩阵创建网络。我正在尝试创建一个矩阵，显示学生通过他们共同或不共享的类（人 - 人矩阵）链接的内容。我已经将原始数据争论到矩阵的第一次迭代中，现在想要将矩阵相乘。我的数据集和当前矩阵是以下更大的版本：

names <- c("Tom", "Dick", "And", "Harry")
class <- c("cs1", "cs2", "cs3", "cs1")
count <- c(1, 1, 0, 1)
df = data.frame (names, class, count)
df2 <- spread(df, "class", "count")

当我运行矩阵乘法代码时，我收到此错误消息：t（m）％*％m中的错误：需要数字/复杂矩阵/向量参数。

m <- as.matrix(df2)
m2 <- t(m) %*% m

之前的SO问题和答案Matrix multiplication in R: requires numeric/complex matrix/vector arguments建议矩阵需要包含数字或因子值，所以我添加了以下代码，但我得到了相同的错误消息：

df2 %>% mutate_if(is.factor, as.character) -> df2
m <- as.matrix(df2)
m2 <- t(m) %*% m

如果有人可以帮我理解我哪里出错/错误信息在这里意味着什么，我将不胜感激。谢谢！

P.S。很抱歉丑陋的代码...... R的新手。

Answer 1

这可能会有所帮助：

# fill NA with 0
df2[is.na(df2)] <- 0

# make row names the names of the people
row.names(df2) <- df2$names
df2 <- df2[,-1]

m <- as.matrix(df2)
m2 <- t(m) %*% m

使用t（）％*％时的R错误消息“需要数字/复杂矩阵/向量参数”

1 个答案: