R语言：解决无法载入程辑包‘rJava’的问题
解决无法载入程辑包‘rJava’的问题
问题描述：
& & library(xlsx)
& 载入需要的程辑包：rJava
loadNamespace()里算'rJava'时.onLoad失败了，详细内容：
& 调用: inDL(x, as.logical(local),
as.logical(now), ...)
& 错误: unable to load shared object 'C:/Pogram
Files/R/R-3.0.2/library/rJava/libs/x64/rJava.dll':
& LoadLibrary failure:
&找不到指定的模块。
& Error: 无法载入程辑包‘rJava’
问题原因：
&rJava调用需要java运行环境，如果“无法载入程辑包‘rJava’”就意味着没有java运行环境或java运行环境出了问题。
解决办法：
1、如果没有java运行环境，则需安装对应版本的jre,如R64就需要安装jre64位的，并且要注意在系统环境变量中指定java_home
2、如果有java运行环境，则是jre版本对应的java_home设置有问题，需重新设置正确的jave_home
& 3、用R命令直接设置java_home，命令如：Sys.setenv(JAVA_HOME='C:\Program
Files\Java\jre7')
已投稿到：
以上网友发言只代表其个人观点，不代表新浪网的观点或立场。苹果/安卓/wp
积分 59, 距离下一级还需 26 积分
道具: 彩虹炫, 雷达卡, 热点灯, 雷鸣之声, 涂鸦板, 金钱卡, 显身卡下一级可获得
权限: 自定义头衔
购买后可立即获得
权限: 隐身
道具: 金钱卡, 雷鸣之声, 彩虹炫, 雷达卡, 涂鸦板, 热点灯
RT，英文水平并不是太好，经常对软件报错的原因看不真切。但是RStudio中默认使用英文，不知是否有切换到中文的方法？谢谢。
支持楼主：、
购买后，论坛将把您花费的资金全部奖励给楼主，以表示您对TA发好贴的支持
载入中......
个人建议坚持英文，原因如下：
1.软件编程语言就是英文，夹杂着中文影响思维
2. 即使有中文报错，翻译得很不好，你也不一能理解
3.由于很多国外人都用R，他们在使用过程中的报错，积累的经验比我们国内要多不知多少倍，你用中文，即使你看懂了报错，也不一定能找到和你犯过同样错误的人，对于你解决问题，不是长久之计。
所以，综上，建议用English。
ps.本人对中文没有仇恨，我很喜欢中文，不过编程是编程，对语言文字的偏爱更多的体现在文字表达的思想上，不用太在乎这些形式。
总评分:&论坛币 + 5&
学术水平 + 1&
热心指数 + 1&
其实我也同意楼上的说法。不过要当真设置中文的话，是这样的——
直接安装中文版的RStudio
如果遇到乱码，就修改RStudio的编码，一般改为UTF-8，基本上就搞定了
还不行的话，配置ODBC，选择ANSI，不要选择unicode
jiangbeilu 发表于
个人建议坚持英文，原因如下：
1.软件编程语言就是英文，夹杂着中文影响思维
2. 即使有中文报错，翻译得很 ...完全同意！
我的安装的英文版为啥还会有中文报错。。。怎么改成英文报错啊看着好难受
游弋1025 发表于
我的安装的英文版为啥还会有中文报错。。。怎么改成英文报错啊看着好难受我也是&&怎么改呢&&有谁知道么
jiewenzhang 发表于
我也是&&怎么改呢&&有谁知道么那是因为你使用的RStudio调用的R软件的本事报错返回的也是中文，不信你可以试试，所以把R语言的报错语言设置为英文，然后重启R即可。
我倒是想改成全英文的！
初级热心勋章
初级热心勋章
中级热心勋章
中级热心勋章
初级信用勋章
初级信用勋章
初级学术勋章
初级学术勋章
中级信用勋章
中级信用勋章
无限扩大经管职场人脉圈！每天抽选50位免费名额，现在就扫& 论坛VIP& 贵宾会员& 可免费加入
加入我们,立即就学扫码下载「就学」app& Join us!& JoinLearn&
&nbsp&nbsp|
&nbsp&nbsp|
&nbsp&nbsp|
&nbsp&nbsp|
&nbsp&nbsp|
&nbsp&nbsp|
如有投资本站或合作意向，请联系（010-）；
邮箱：service@pinggu.org
投诉或不良信息处理：（010-）
京ICP证090565号
京公网安备号
论坛法律顾问：王进律师苹果/安卓/wp
积分 15, 距离下一级还需 9 积分
权限: 设置帖子权限
道具: 彩虹炫, 雷达卡, 热点灯, 雷鸣之声, 涂鸦板, 金钱卡
购买后可立即获得
权限: 隐身
道具: 金钱卡, 雷鸣之声, 彩虹炫, 雷达卡, 涂鸦板, 热点灯
苦逼签到天数: 2 天连续签到: 1 天[LV.1]初来乍到
generate_data=function(T,theta.true){
epsilon=rnorm(T,0,theta.true[1])
y[1]=epsilon[1]
for(t in 2:T)
& &{y[t]=theta.true[2]*epsilon[t-1]+epsilon[t]}
return(y)}
L=function(data,x1,x2){
for(t in 1:T)
{dt=dt+log(x1*(1-x2^(2*t+2))/(1-x2^(2*t)))}
Y=rep(0,T)
Y[1]=data[1]
for(t in 2:T)
{Y[t]=data[t]-x2*(1-x2^(2*t-2))*Y[t-1]/(1-x2^(2*t))}
Sum=data[1]^2/((1+x2^2)*x1)
for(t in 2:T)
{Sum=Sum+Y[t]^2*(1-x2^(2*t))/(x1*(1-x2^(2*t+2)))}
l=-0.5*dt-0.5*Sum
likeli=function(data,f,j){
g1=(L(f+deta,j)-L(f,j))/deta
g2=(L(f,j+deta)-L(f,j))/deta
g=c(g1,g2)
return(g)}
NR=function(data,epsilon){
theta.temp=c(0.2,0.6)
Gtemp=likeli(data,theta.temp[1],theta.temp[2])&&
for(iter in 1:T){
theta=theta.temp+A%*%Gtemp
G=likeli(data,theta[1],theta[2])
A=A-(A%*%(G-Gtemp)%*%t(G-Gtemp)%*%A)/(t(G-Gtemp)%*%A%*%(G-Gtemp))-((theta-theta.temp)%*%t(theta-theta.temp))/((t(G-Gtemp)%*%(theta-theta.temp))
dif=max(abs(theta-theta.temp))
if(dif&=epsilon)break
theta.temp=theta
Gtemp=likeli(data,theta.temp[1],theta.temp[2])}
return(theta)
近段时间在学时间序列分析，老师要求采取改进的牛顿迭代方法来进行极大似然估计
是对Ma（1）过程，但是问题出现在最后一个NR函数，
A=A-(A%*%(G-Gtemp)%*%t(G-Gtemp)%*%A)/(t(G-Gtemp)%*%A%*%(G-Gtemp))-((theta-theta.temp)%*%t(theta-theta.temp))/((t(G-Gtemp)%*%(theta-theta.temp))
dif=max(abs(theta-theta.temp))
之后会报错显示错误: unexpected symbol in:
&A=A-(A%*%(G-Gtemp)%*%t(G-Gtemp)%*%A)/(t(G-Gtemp)%*%A%*%(G-Gtemp))-((theta-theta.temp)%*%t(theta-theta.temp))/((t(G-Gtemp)%*%(theta-theta.temp))
A的表达式是按照书上的来的，检查了好多遍应该没有输错，但一直找不到错误原因，求各位大神帮帮忙！！感激不尽！！
支持楼主：、
购买后，论坛将把您花费的资金全部奖励给楼主，以表示您对TA发好贴的支持
载入中......
应该是这句& if(dif&=epsilon)break & 的问题，如果条件true，没有返回的值，会报错。
fun =function(x){
& & if(max(x)&2) break
& &return(max(x))
& a = c(0,1, 0.2, 0.3, 0.5)
Error in fun(a) : no loop for break/next, jumping to top level
& a = c(0, 1, 3, 0.5)
建议改成：
fun =function(x){
& & if(max(x)&2){return(max(x));&&break}
& &return(max(x))
热心帮助其他会员
总评分:&热心指数 + 1&
无限扩大经管职场人脉圈！每天抽选50位免费名额，现在就扫& 论坛VIP& 贵宾会员& 可免费加入
加入我们,立即就学扫码下载「就学」app& Join us!& JoinLearn&
&nbsp&nbsp|
&nbsp&nbsp|
&nbsp&nbsp|
&nbsp&nbsp|
&nbsp&nbsp|
&nbsp&nbsp|
如有投资本站或合作意向，请联系（010-）；
邮箱：service@pinggu.org
投诉或不良信息处理：（010-）
京ICP证090565号
京公网安备号
论坛法律顾问：王进律师23:01 提问
R语言，t-test报错，怎么都改不对。。。请各位指导，谢谢！
一个10*10的矩阵matrixname，
把每一行的进行1:6和7:10，做t.test。
在此之前，对每行做了f-test，
T_equ &- matrixname[F_equ, ]
T_unequ &- matrixname[-F_equ, ]
#我看了T_unequ ，没问题
然后把方差相等的行拿出来做var.equal=TRUE的t.tes
t,没问题：
T_equ_te &- apply(T_equ, 1, function(x) t.test(x[1:6],x[7:10], var.equal=TRUE)[[3]])
#索引3就是想把每个P-value提出来给变量）
再把方差不相等的行拿出来做方差不等的t.test,报错了
T_unequ_te &- apply(T_unequ, 1, function(x) t.test(x[1:6],x[7:10])[[3]]）#不等就啥也不用加
Error in t.test.default(x[1:6], x[7:10]） :
data are essentially constant
按赞数排序
你下面那句T_unequ_te &- apply(T_unequ, 1, function(x) t.test(x[1:6],x[7:10])[[3]]）
最后一个是中文格式的右括号，改掉试试
如果还不行的话，再贴上来
548关注|370收录
550关注|1137收录
1695关注|819收录}