R语言出现强制改变过程中产生了NA如何解决？

要求创建一个对角元素全为pi的五阶对角矩阵

(b2<-rep("pi",5))
(diag(b2))


[1] "pi" "pi" "pi" "pi" "pi"
  [,1] [,2] [,3] [,4] [,5]
[1,]   NA    0    0    0    0
[2,]    0   NA    0    0    0
[3,]    0    0   NA    0    0
[4,]    0    0    0   NA    0
[5,]    0    0    0    0   NA
Warning message:
In diag(b2) : 强制改变过程中产生了NA

这里有一个相同问题: 请查看是否对问题有帮助~
https://ask.csdn.net/questions/7410942