R 如何连接字符串

R 如何连接字符串,r,R,我对此做了一些研究,并试图让它在我自己的工作,但无济于事。我正在尝试将几个字符串连接在一起,以便从web下载CSV文件 这个小脚本只适用于一只股票 read.csv("http://financials.morningstar.com/ajax/exportKR2CSV.html?&t=AAPL",header=T,stringsAsFactors = F,skip = 2)[,-c(12)]->spreadsheet 我正在尝试连接这些字符串,但事情对我来说并不顺利 stock

我对此做了一些研究,并试图让它在我自己的工作,但无济于事。我正在尝试将几个字符串连接在一起,以便从web下载CSV文件

这个小脚本只适用于一只股票

read.csv("http://financials.morningstar.com/ajax/exportKR2CSV.html?&t=AAPL",header=T,stringsAsFactors = F,skip = 2)[,-c(12)]->spreadsheet
我正在尝试连接这些字符串,但事情对我来说并不顺利

stocks <- c("AXP","BA","CAT","CSCO")

for (s in stocks) 
{
paste("read.csv("http://financials.morningstar.com/ajax/exportKR2CSV.html?&t=",s,header=T,stringsAsFactors = F,skip = 2)[,-c(12)]->spreadsheet)
paste("write.table(stockdata, "C:/Users/rshuell001/Desktop/files/",s,".csv", sep=",", row.names=FALSE, col.names=FALSE))
}


Or.....


stocks <- c("AXP","BA","CAT","CSCO")

for (s in stocks) 
{
cat("read.csv("http://financials.morningstar.com/ajax/exportKR2CSV.html?&t=",s,header=T,stringsAsFactors = F,skip = 2)[,-c(12)]->spreadsheet)
cat("write.table(stockdata, "C:/Users/rshuell001/Desktop/files/",s,".csv", sep=",", row.names=FALSE, col.names=FALSE))
}

stocks我们可以使用
sprintf
创建URL的
向量

urls <- sprintf("http://financials.morningstar.com/ajax/exportKR2CSV.html?&t=%s", stocks)

我们可以使用
sprintf
创建URL的
vector

urls <- sprintf("http://financials.morningstar.com/ajax/exportKR2CSV.html?&t=%s", stocks)

您还需要交替使用单引号和双引号,或者对它们进行转义,例如
粘贴(“你好”,“世界”)
。您还需要交替使用单引号和双引号,或者对它们进行转义,例如
粘贴(“你好”,“世界”)
。哇!很酷。只剩下一个问题。股票行情已经不见了,所以我真的不知道是什么。如何获取数据集中的标记以识别我正在查看的内容?或者,我怎么能简单地分别保存每个文件,股票代码就是文件名?@RYGY7272你可以用
stocks
命名
lst
,也就是说
names(lst)现在正试图实现这一点,但我的VS不断崩溃。哇!很酷。只剩下一个问题。股票行情已经不见了,所以我真的不知道是什么。如何获取数据集中的标记以识别我正在查看的内容?或者,我怎么能简单地分别保存每个文件,股票代码就是文件名?@RYGY7272你可以用
stocks
来命名
lst
,也就是说
names(lst)现在正试图实现这一点,但我的VS不断崩溃。
library(data.table)
lst <- lapply(urls, fread, skip= 2, drop=12)