楼主: cbw1243
44330 504

[问答] 接受各种R语言难题   [推广有奖]

351
vicki_1991 发表于 2016-11-6 21:07:01
cbw1243 发表于 2016-11-6 00:59
显示的错误是什么?
今天我又试了一下能下载了,然后baidumap又下载不了了,感觉应该是github这个网站的缘故吧

352
vicki_1991 发表于 2016-11-6 21:14:36
vicki_1991 发表于 2016-11-6 21:07
今天我又试了一下能下载了,然后baidumap又下载不了了,感觉应该是github这个网站的缘故吧
显示的是这个,大神有什么好的解决办法吗?

Downloading GitHub repo badbye/baidumap@master
from URL https://api.github.com/repos/badbye/baidumap/zipball/master
Installing baidumap
"C:/PROGRA~1/R/R-33~1.1/bin/x64/R" --no-site-file --no-environ --no-save  \
  --no-restore --quiet CMD INSTALL  \
  "C:/Users/Vicki/AppData/Local/Temp/Rtmpiiq4RC/devtools34e87afa3363/badbye-baidumap-e078ef8"  \
  --library="C:/Users/Vicki/Documents/R/win-library/3.3" --install-tests

* installing *source* package 'baidumap' ...
** R
** preparing package for lazy loading
Error in loadNamespace(j <- i[[1L]], c(lib.loc, .libPaths()), versionCheck = vI[[j]]) :
  there is no package called 'bitops'
ERROR: lazy loading failed for package 'baidumap'
* removing 'C:/Users/Vicki/Documents/R/win-library/3.3/baidumap'
错误: Command failed (1)

353
cbw1243 发表于 2016-11-7 01:47:55
vicki_1991 发表于 2016-11-6 21:14
显示的是这个,大神有什么好的解决办法吗?

Downloading GitHub repo badbye/baidumap@master
github里的程序经常有bug。
这个显示 ‘bitops'这个包没有找到,试试先下载这个包,再下载baidumap

354
比鲁斯 发表于 2016-11-7 18:11:09 来自手机
cbw1243 发表于 2016-6-26 09:15
暑假漫长,生活没有挑战。在此征集各类R语言疑难杂症,欢迎各位骚扰。
提出给力问题的,将予以100论坛币奖 ...
大神,1.将10个表串联?
2.用jsonlite转csv,本来要循环的,但是最后只下了一个表...求帮助

355
jxapp_6451 发表于 2016-11-7 22:14:14
小白求助,如何将数据框转化成列表,并且把数据框里面的NA去掉

356
cbw1243 发表于 2016-11-7 22:44:08
比鲁斯 发表于 2016-11-7 18:11
大神,1.将10个表串联?
2.用jsonlite转csv,本来要循环的,但是最后只下了一个表...求帮助
循环 for后面的语句你是怎么写的

357
cbw1243 发表于 2016-11-7 22:44:56
jxapp_6451 发表于 2016-11-7 22:14
小白求助,如何将数据框转化成列表,并且把数据框里面的NA去掉
用is.na识别na,然后删除

358
kaka0125 发表于 2016-11-8 00:13:02
Hi,cbw1243, 您好!
最近一直在折腾一份非平衡面板数据的回归分析,有一个错误一直调试不好,特来求助。

我的数据集结构如下:
> str(stockbrcha)
Classes ‘plm.dim’ and ‘data.frame’:        27496 obs. of  25 variables:
$ tic               : Factor w/ 2946 levels “A”,”AA”,”AAL”,..: 1 1 1 1 1 1 1 1 1 1 …
$ date              : Factor w/ 16871 levels “1/25/09 2:35”,..: 773 808 833 846 869 922 942 957 985 1014 …
$ IS_EFFECTIVE      : num  1 1 1 1 1 1 1 1 1 1 …
$ MATERIAL_WEAKNESS : num  1 0 0 0 0 0 0 0 0 0 …
$ SIG_DEFICIENCY    : num  0 0 0 0 0 0 0 1 0 0 …
$ NOTEFF_ACC_RULE   : int  1 0 0 0 0 0 0 0 0 0 …
$ NOTEFF_FIN_FRAUD  : int  0 0 0 0 0 0 0 0 0 0 …
$ NOTEFF_OTHER      : int  5 0 0 0 0 0 0 5 0 0 …
$ IC_OP_TYPE        : int  1 1 1 1 1 1 1 1 1 1 …
$ AUDITOR_FKEY      : int  1 1 1 1 1 1 1 1 1 1 …
$ AUDITOR_AGREES    : num  1 1 0 0 0 0 0 0 0 1 …
$ COMBINED_IC_OP    : num  0 1 1 0 1 1 1 1 0 1 …
$ IC_IS_EFFECTIVE   : num  1 1 1 1 1 1 1 1 1 1 …
$ AUDIT_FEES        : num  10730000 7176000 6142000 6647000 5663000 …
$ NON_AUDIT_FEES    : int  3761000 5616000 970339 758000 2599000 1037000 820000 390000 1011000 2352000 …
$ BENEFITS_FEES     : int  0 0 0 0 0 0 0 0 0 0 …
$ IT_FEES           : int  0 0 0 0 0 0 0 0 0 0 …
$ TAX_FEES          : int  308000 742000 662039 503000 169000 742000 720000 285000 245000 265000 …
$ AUDIT_RELATED_FEES: int  3443000 4863000 253300 252000 2422000 288000 97000 105000 762000 1695000 …
$ OTHER_FEES        : int  10000 11000 55000 3000 8000 7000 3000 0 4000 392000 …
$ mean              : num  1176 1176 1176 1176 1176 …
$ sd                : num  202 202 202 202 202 …
$ shape             : num  16.9 16.9 16.9 16.9 16.9 …
$ rate              : num  0.0141 0.0141 0.0141 0.0141 0.0141 …
$ ddate             : Factor w/ 16871 levels “1/25/09 2:35”,..: 773 808 833 846 869 922 942 957 985 1014 …

需要执行的命令如下:
> stockbrcha = plm.data(stockbrcha, indexes = NULL)  %把数据转化成适合面板分析的数据
> form = stockbrcha$mean ~ stockbrcha$IS_EFFECTIVE+stockbrcha$MATERIAL_WEAKNESS+stockbrcha$SIG_DEFICIENCY+stockbrcha$AUDITOR_AGREES+stockbrcha$COMBINED_IC_OP+stockbrcha$IC_IS_EFFECTIVE+stockbrcha$AUDIT_FEES %回归公式
> ptest = plm(form,data = stockbrcha,effect = “individual”, model = “within”) % 固定效应面板分析

执行错误如下:
series IC_OP_TYPE, IT_FEES are constants and have been removed
Error in names(y) <- namesy :
  ‘names’ attribute [27496] must be the same length as the vector [0]


我也traceback()了一下,显示:
> traceback()
4: pmodel.response.pFormula(formula, data, model = model, effect = effect,
       theta = theta)
3: pmodel.response(formula, data, model = model, effect = effect,
       theta = theta)
2: plm.fit(formula, data, model, effect, random.method, random.dfcor,
       inst.method)
1: plm(form, data = stockbrcha, effect = “individual”, model = “within”)
BUT我看不懂……

一开始我以为是因为我有的变量缺失值太多,导致各个变量之间长度不一。所以我就把缺失值全都填补了,可是错误仍然存在。也用length()命令查询过所有的变量,长度明明都是27496啊。

我需要用公式里的七个自变量来预测因变量Y,之前我已经执行过类似的公式,当时面板分析是可以做的,没有error,只是R方太低,所以我就换了一个因变量。

google了很多网页,情况都跟我的不同。特发帖求助,先谢过!
Any help will be highly appreciated!
THX!

Lijuan Huang
Xidian University

359
jxapp_6451 发表于 2016-11-9 21:35:48
cbw1243 发表于 2016-11-7 22:44
用is.na识别na,然后删除
比如

> list(a,b,c)
[[1]]
[1] 120 124 130 136

[[2]]
[1] 122 120  NA  NA

[[3]]
[1] 128 130 134  NA

我想转换成

> list(a,b,c)
[[1]]
[1] 120 124 130 136

[[2]]
[1] 122 120

[[3]]
[1] 128 130 134

这要怎么做

360
BurgessQ 发表于 2016-11-11 11:18:26
大神,你好,我现在写了一个脚本文件,但是希望分两次执行。比如说先运行脚本文件中的前几行,然后在console中运行几行后,再运行脚本文件中剩余的部分。相当于在运行脚本时有一个交互的过程,请问如何实现?非常感谢~

您需要登录后才可以回帖 登录 | 我要注册

本版微信群
加好友,备注cda
拉您进交流群
GMT+8, 2025-12-31 19:42