小编Qbi*_*bik的帖子

R 函数 zip(utils) 在我的机器上不起作用

我想使用 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 根本不返回任何错误!我对电脑不太了解,我应该检查什么?我的情况可能有什么问题?我关闭了没有帮助的防病毒软件。

compression zip windows-xp r admin

3
推荐指数
1
解决办法
3360
查看次数

如何在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)

r function eigenvalue eigenvector

3
推荐指数
1
解决办法
1万
查看次数

C++读取每行中具有未知整数数的固定行数

我正在尝试读取数据并解决简单问题,数据:

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)

c++ dev-c++

3
推荐指数
1
解决办法
1232
查看次数

如何在C/C++中获取多维数组的列?

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个元素?

c c++ arrays variable-assignment multidimensional-array

3
推荐指数
2
解决办法
3万
查看次数

使用以下方法处理复杂公式:=(data.table通过引用分配)

要计算一些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)

是错误的方向.

r data.table

3
推荐指数
2
解决办法
79
查看次数

R创建带滑块的交互式绘图,宽度可以像Google财经中那样更改(相当大的时间窗口)

R创建带滑块的交互式绘图,宽度可以更改,例如下面,我正在搜索ggvis R包,但其他也欢迎:

在此输入图像描述

r shiny googlevis rcharts ggvis

3
推荐指数
1
解决办法
363
查看次数

R quantmod buildModel() 不适合模型

使用 拟合模型时我无法避免错误quantmodbuildModel似乎不起作用,因此使用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)

runtime-error r quantmod

3
推荐指数
1
解决办法
262
查看次数

是否有任何网站监控CRAN包存储库中的新R包?

是否有任何网站监控CRAN包存储库中的新R包?数据+名称+简短说明?或者R-CRAN可能会提供一份月度文档,列出添加到CRAN存档的新软件包,但我没有看到.

这对于寻找新的R功能将是一个很好的功能.

r cran

2
推荐指数
2
解决办法
424
查看次数

如何退出 anaconda 提示符并返回到 cmd 级别?

如何退出 anaconda 提示符并返回到 cmd 级别?

我运行打开 anaconda 提示符: %windir%\System32\cmd.exe "/K" C:\folder\folder\anaconda3\Scripts\activate.bat activate tf_2_gpu

我可以“卸载”anaconda 并返回到通常的 cmd 对话框控制台吗?

cmd anaconda windows-10

2
推荐指数
1
解决办法
1万
查看次数

如果索引从 1 开始,为什么矩阵允许索引为零?

matrix如果索引从 1 开始,为什么R中的类型允许索引为零?

> m = diag(10)
> dim(m[0,0])
[1] 0 0
Run Code Online (Sandbox Code Playgroud)

这是语言实现中的错误还是功能?

r matrix

2
推荐指数
1
解决办法
41
查看次数