以列表作为数据源在R中排序条形图

我试着在R中订购一个条形图，但我得到了有趣的结果。数据源是一个列表。也许这就是问题所在，但我不知道如何解决

初步图表如下：

我用以下代码得到它：

file <- c("C://path//file.csv")
dataSource <- read.table(file, header=T, sep=",")
#typeof(dataSource) ==> this gives me a 'list'
dataChart <- dataSource[ , c("Product","YTD")]
dataChart <- na.omit(dataChart)
barplot(dataChart[ ,2], names.arg = dataChart[ ,1],
      horiz = TRUE,
      ylab = "",
      xlab = "",
      main="Title", 
      las=1)

---

关于如何正确排序图表有什么想法吗？数据的加载方式有问题吗？

我认为您只想对数据进行排序

dataChart = dataChart[order(dataChart$YTD),]
barplot(dataChart[ ,2], names.arg = dataChart[ ,1],
      horiz = TRUE,
      ylab = "",
      xlab = "",
      main="Title", 
      las=1)

---

structurelistProduct=structurec2L、4L、5L、7L、8L、9L、10L、13L、1L、3L、4L、6L、11L、12L、13L、13L、.Label=cADT、BHL、CEX、CMX、CTL、HTH、MTL、SSL、TLS、UTV、WEX、WLD、WMX、class=factor、YTD=c67L、5026L、503L、29L、3975L、876L、NA、40L、62L、1395L、717L、NA、423L、277L、35L、CPR=YTA、数据帧名称、CND、CND、CND，-15lfantatic。谢谢G5W

dataSource = structure(list(Product = structure(c(2L, 4L, 5L, 7L, 8L, 9L, 
10L, 13L, 1L, 3L, 4L, 6L, 11L, 12L, 13L), .Label = c("ADT", "BHL", 
"CEX", "CMX", "CTL", "HTH", "MTL", "SSL", "TLS", "UTV", "WEX", 
"WLD", "WMX"), class = "factor"), YTD = c(67L, 5026L, 503L, 29L, 
3975L, 876L, NA, 40L, 62L, 1395L, 717L, NA, 423L, 277L, 35L)), .Names = c("Product", 
"YTD"), class = "data.frame", row.names = c(NA, -15L))

dataChart = dataChart[order(dataChart$YTD),]
barplot(dataChart[ ,2], names.arg = dataChart[ ,1],
      horiz = TRUE,
      ylab = "",
      xlab = "",
      main="Title", 
      las=1)