pie（）出错：'x'值必须为正数

Question

如表中所示，所有数字均为正数。我想要一个带有图例的相对频率的饼图。但在考虑制作传说之前......我需要有饼图...当我运行它时......它一遍又一遍地给我同样的错误。就像我的所有x值都是正数但给我错误。请帮我修理一下。谢谢。

我的表：

 end

代码：

SocialIssue     Frequency   RelFreq
1        Housing       245 0.2401961
2 Transportation       112 0.1098039
3    Health Care       153 0.1500000
4      Education        71 0.0696078
5           Food       133 0.1303922
6          Other       306 0.3000000

错误：

data1 <- read.csv("C:/Users/jaina/Desktop/Question1CSV.csv", header = T)
data1$RelFreq = data1$Frequency / sum(data1$Frequency)
options(digits = 6)

pie(data1)