我有一些90个金融符号的数据帧(将使用3为简单起见) > View(syM)
symbol
1 APPL
2 YAHOO
3 IBM
我创建的获取JSON数据为这些符号的函数,并且产生输出。基本上: nX <- function(x) {
#get data for "x", format it, and store it in "nX"
nX <- x
该问题与How do I do a conditional sum which only looks between certain date criteria类似,但稍有不同,并且回答不符合当前问题。主要的区别是,根据各组日期列不一定是完整的(即特定的日期可能会丢失) 输入: input <- read.table(text="
2017-04-01 A 1
2017-04-02 B