怎么导入邻接矩阵？

矩阵是0-1权重矩阵，CSV格式的，已经准备好。想问一下在R语言中怎么导入这个文件？

有人帮忙写一下程序语言吗？
现在用的是

my.mat1<-read.csv("g:\\w1.csv",header=F)

my.mat1<- as.matrix(my.mat1)

my.listw<- mat2listw(my.mat1,row.names = NULL, style="W")

[size=13.3333px]总出错：

[size=13.3333px]

[size=13.3333px]Warning message:

[size=13.3333px]In nb2listw(res$neighbours, glist = res$weights, style = style,  :

[size=13.3333px]  zero sum general weights

还有做SLM模型提示则个：
Warning messages:
1: In lag.listw(listw, u, zero.policy) : NAs in lagged values
2: In lag.listw(listw, y, zero.policy) : NAs in lagged values
3: In lag.listw(listw, yhat, zero.policy) : NAs in lagged values
4: In lm.LMtests(ppp.lm, my.listw, test = c("LMerr", "LMlag", "RLMerr",  :
  Out-of-range p-value: reconsider test arguments
5: In lm.LMtests(ppp.lm, my.listw, test = c("LMerr", "LMlag", "RLMerr",  :
  Out-of-range p-value: reconsider test arguments
6: In lm.LMtests(ppp.lm, my.listw, test = c("LMerr", "LMlag", "RLMerr",  :
  Out-of-range p-value: reconsider test arguments
7: In lm.LMtests(ppp.lm, my.listw, test = c("LMerr", "LMlag", "RLMerr",  :
  Out-of-range p-value: reconsider test arguments
8: In lm.LMtests(ppp.lm, my.listw, test = c("LMerr", "LMlag", "RLMerr",  :
  Out-of-range p-value: reconsider test arguments

tong wen  xiexie