我想使用 zip(utils) 函数,解压缩函数工作正常,但是,调用 zip 例如 zip ("out", "file.txt") 不会将文件 ("out.zip") 返回到工作目录并且 R 根本不返回任何消息 - 任何错误消息,并且没有关于成功压缩的消息 - 如果压缩成功,R 将返回诸如“deflate - 40%”之类的信息。我检查了各种 R 版本和文件 - zip 仍然不起作用。在另一台计算机上,一切正常。我有Windows XP。此外,当我输入错误的要压缩的 zip 文件名称时,例如 zip("out", "this_file_doesnt_exist.txt") R 根本不返回任何错误!我对电脑不太了解,我应该检查什么?我的情况可能有什么问题?我关闭了没有帮助的防病毒软件。
版本:我的问题中的问题是我试图S从等式8中找到矩阵,但这个等式有误差.
如何在R中直接获得矩阵的右特征向量?'eigen()'仅给出左特征向量
真的是上一版,我在这里弄得很乱,但这个问题对我来说非常重要:
eigen()从函数帮助中提供一些特征向量矩阵:
"如果'r < - eigen(A)'和'V < - r $ vectors; lam < - r $ values',那么
A = V Lmbd V^(-1)
Run Code Online (Sandbox Code Playgroud)
(最多数字模糊),其中Lmbd =diag(lam)"
也就是说A V = V Lmbd,现在我们检查它是V是矩阵:
set.seed(1)
A<-matrix(rnorm(16),4,4)
Lmbd=diag(eigen(A)$values)
V=eigen(A)$vectors
A%*%V
> A%*%V
[,1] [,2] [,3] [,4]
[1,] 0.0479968+0.5065111i 0.0479968-0.5065111i 0.2000725+0i 0.30290103+0i
[2,] -0.2150354+1.1746298i -0.2150354-1.1746298i -0.4751152+0i -0.76691563+0i
[3,] -0.2536875-0.2877404i -0.2536875+0.2877404i 1.3564475+0i 0.27756026+0i
[4,] 0.9537141-0.0371259i 0.9537141+0.0371259i 0.3245555+0i -0.03050335+0i
> V%*%Lmbd
[,1] …Run Code Online (Sandbox Code Playgroud) 我正在尝试读取数据并解决简单问题,数据:
3 - number of lines to read in
1 1
2 2 2
3 4
Run Code Online (Sandbox Code Playgroud)
在输入每一行之后,我想获得输入数量的总和,但每行中的整数数量是未知的.使用上面的数据后,屏幕应如下所示:
3
1 1
Sum: 2
2 2 2
Sum: 6
3 4
Sum: 7
Run Code Online (Sandbox Code Playgroud)
但是根据我的算法,我得到了输出:
3
1 1
Sum: 1
2 2 2
Sum: 4
3 4
Sum: 3
Run Code Online (Sandbox Code Playgroud)
我已经写代码,但它不能正常工作(如上):
版
我提高了我的代码,并知道它正常工作,不附带任何条件等,适当的代码如下:
#include<iostream>
using namespace std;
int main()
{
int x;
int t, sum;
cin >> t;
for(int i=0; i<t; i++) {
sum=0;
while(true)
{
cin >> x;
sum = sum + x; …Run Code Online (Sandbox Code Playgroud) int matrix[9][9],*p;
p=matrix[0];
Run Code Online (Sandbox Code Playgroud)
这工作并给出了第一行matrix,但如何获得matrix我试过的第一列p=matrix[][0]; ?另外我不明白为什么下面的代码会出现编译错误?
int matrix[9][9],p[9]; // it looks really ugly, byt why it doesn't work ?
p=matrix[0]; // compiler gives "invalid array assigment"
Run Code Online (Sandbox Code Playgroud)
是因为多维数组是数组的数组 - 我们应该解释matrix[i][j]为第i个嵌套数组的第j个元素?
要计算一些xover的聚合label并将其添加到数据,我可以使用以下代码,因为mean它是:
library(data.table)
setDT(data)[, y := mean(x), label]
Run Code Online (Sandbox Code Playgroud)
但是如何计算仅在给定的组大小label超过5时输入0否则.我第一次尝试计算使用群体的大小length,nrow而不是mean关键字,但它是不正确的做法并不起作用.我使用的样本数据集:
set.seed(123)
data<-data.frame(label=sample(c("A","B"),10,replace=TRUE),x=rnorm(10))
data
# label x
#1 A 1.7150650
#2 B 0.4609162
#3 A -1.2650612
#4 B -0.6868529
#5 B -0.4456620
#6 A 1.2240818
#7 B 0.3598138
#8 B 0.4007715
#9 B 0.1106827
#10 A -0.5558411
Run Code Online (Sandbox Code Playgroud)
我看到尝试代码如下:
setDT(data)[, y := ifelse(nrow(x)>10,mean(x),0), label] # don't run
Run Code Online (Sandbox Code Playgroud)
是错误的方向.
使用 拟合模型时我无法避免错误quantmod,buildModel似乎不起作用,因此使用tradeModel上升错误:
getSymbols('GS',src='yahoo')
q.model = specifyModel(Next(OpCl(GS)) ~ Lag(OpHi(GS),0:3))
buildModel(q.model, method='lm',training.per=c('2007-08-01','2007-09-30'))
> q.model # it seems that model is still 'None fitted' ?
quantmod object: Build date:
Model Specified:
Next(OpCl(GS)) ~ Lag(OpHi(GS), 0:3)
Model Target: Next.OpCl.GS Product: GS
Model Inputs:
Fitted Model:
None Fitted
tradeModel(q.model,plot.model=TRUE,trade.dates=c("2008-01-01","2008-12-31"))
Error in UseMethod("predict") :
no applicable method for 'predict' applied to an object of class "NULL"
Run Code Online (Sandbox Code Playgroud) 是否有任何网站监控CRAN包存储库中的新R包?数据+名称+简短说明?或者R-CRAN可能会提供一份月度文档,列出添加到CRAN存档的新软件包,但我没有看到.
这对于寻找新的R功能将是一个很好的功能.
如何退出 anaconda 提示符并返回到 cmd 级别?
我运行打开 anaconda 提示符:
%windir%\System32\cmd.exe "/K" C:\folder\folder\anaconda3\Scripts\activate.bat activate tf_2_gpu
我可以“卸载”anaconda 并返回到通常的 cmd 对话框控制台吗?
matrix如果索引从 1 开始,为什么R中的类型允许索引为零?
> m = diag(10)
> dim(m[0,0])
[1] 0 0
Run Code Online (Sandbox Code Playgroud)
这是语言实现中的错误还是功能?
r ×7
c++ ×2
admin ×1
anaconda ×1
arrays ×1
c ×1
cmd ×1
compression ×1
cran ×1
data.table ×1
dev-c++ ×1
eigenvalue ×1
eigenvector ×1
function ×1
ggvis ×1
googlevis ×1
matrix ×1
quantmod ×1
rcharts ×1
shiny ×1
windows-10 ×1
windows-xp ×1
zip ×1