如何读取Excel文件作为数据框

我正在试图用国际货币基金组织的一些数据做一些情节。 我试图用read.table（）读取xls文件：

base <- read.table("http://www.imf.org/external/pubs/ft/weo/2017/02/weodata/WEOOct2017all.xls", header=TRUE, sep="\t", fill=TRUE) 

但是，数据保存为列表：

 typeof(base) [1] "list" 

而且我不知道如何提取数据来制作一个barplot。 例如，我想为variables“NGDP_RPCH”绘制“ARG”国家和2010-2019年（excel中40-49列）的variables。

我试过这个，但没有奏效：

 graph <- base[which((base[2]=="ARG")&(base[3]=='NGDP_RPCH')),40:49] graph [1] X2010 X2011 X2012 X2013 X2014 X2015 X2016 X2017 X2018 X2019 <0 rows> (or 0-length row.names) 

我想知道如何将数据保存为数据框，或者如何从列表中提取数据的vector，所以我可以运行：

 barplot(graph). 

Answer 1

首先，使用适当的工具导入Excel文件。 这可能包括readxl ， openxlsx ， XLConnect ， xlsx等软件包。

 library(readxl) base <- read_excel("~/Desktop/WEOOct2017all.xls") 

然后使用[[select单个列，而不是[ 。

 graph <- base[which((base[[2]]=="ARG")&(base[[3]]=='NGDP_RPCH')),40:49] 

并转换为matrix使用barplot 。

 barplot(as.matrix(graph))