小编eqs*_*qsf的帖子

正在计算需要两周才能运行的大量数据.当我尝试导出数据以在MS SQL中使用时,我的RStudio崩溃了,我不得不重新打开它.现在,当我试图寻找数据时,它似乎缺失了!哎呀!

这些数据是存放在某个文件中的,还是您在该会话中使用的所有数据都会消失？

对不起我对R的无知,我很陌生.

在此先感谢您的帮助.

尝试使用R中的GMM包来估计线性模型的参数(af):

LEV1 = a*Macro + b*Firm + c*Sector + d*qtr + e*fqtr + f*tax

Macro,Firm和Sector是具有n行的矩阵.qtr,fqtr和tax是具有n个成员的向量.

我有一个名为unconstrd的大型数据框,它包含所有数据.首先,我将数据分解为单独的矩阵:

v_LEV1 <- as.matrix(unconstrd$LEV1)
Macro <- as.matrix(cbind(unconstrd$Agg_Corp_Prof,unconstrd$R1000_TR, unconstrd$CP_Spread))
Firm <- as.matrix(cbind(unconstrd$ppe_ratio, unconstrd$op_inc_ratio_avg, unconstrd$selling_exp_avg,
                  unconstrd$tax_avg, unconstrd$Mark_to_Bk, unconstrd$mc_ratio))
Sector <- as.matrix(cbind(unconstrd$Sect_Flag03,
                  unconstrd$Sect_Flag04, unconstrd$Sect_Flag05, unconstrd$Sect_Flag06,
                  unconstrd$Sect_Flag07, unconstrd$Sect_Flag08, unconstrd$Sect_Flag12,
                  unconstrd$Sect_Flag13, unconstrd$Sect_Flag14, unconstrd$Sect_Flag15,
                  unconstrd$Sect_Flag17))
v_qtr <- as.matrix(unconstrd$qtr)
v_fqtr <- as.matrix(unconstrd$fqtr)
v_tax <- as.matrix(unconstrd$tax_dummy)

然后,我将数据绑定在一起,用于gmm调用的x变量:

h=cbind(Macro,Firm,Sector,v_qtr, v_fqtr, v_tax)

然后,我调用gmm:

gmm1 <- gmm(v_LEV1 ~ Macro + Firm + Sector + v_qtr + v_fqtr + v_tax, x=h)

我收到消息:

Error in solve.default(crossprod(hm, xm), crossprod(hm, …

为了简化我的问题,假设我有一份按安全性划分的季度日期和销售数字表.

month_end_date,ID,Sales

我需要计算每个ID的销售额的四分之一移动平均值.我试着做以下事情:

-- CALCULATE FOUR QUARTER AVERAGES
-- CREATE INDEX OF DATES
SELECT *, date_idx=RANK() OVER(PARTITION BY ID ORDER BY month_end_date)
INTO #Temp_Date_Index
FROM #Temp_industrials
GO
CREATE INDEX idx_1 on #Temp_Date_Index(ID, date_idx)
GO

-- CALCULATE MOVING AVERAGE
SELECT MAX(month_end_date), ID, Sales_avg=AVG(Sales)
INTO #Temp_4Q_Avgs
FROM #Temp_Date_Index
WHERE date_idx>=4 AND (date_idx BETWEEN date_idx AND (date_idx-4))
GROUP BY ID

创建日期索引的第一步工作正常,但"CALCULATE MOVING AVERAGE"部分给出了一个错误"对象或列名称丢失或为空".如果我MAX(month_end_date)从SELECT行中取出它没有错误地运行,但给了我一个空表结果.

也许我的方法存在根本缺陷.

在此先感谢您的帮助.

还尝试使用子查询:

SELECT end_of_period=MAX(month_end_date), ID, 
op_inc_avg=AVG(
SELECT r.Sales
FROM #Temp_Date_Index r
WHERE r.date_idx BETWEEN l.date_idx AND (l.date_idx-3) …