小编von*_*njd的帖子

如何在网页上设置基于R的服务

我想在网页上提供以下服务:

  • 每天运行一个R脚本,收集公开可用的数据并进行一些计算(我已经开发了脚本,它需要一些额外的库!)
  • 在网页上发布更新的图形和数字/文本输出

我不想一直运行自己的计算机,所以应该采用一种云解决方案(我猜?!?).

您对如何完成上述想法有什么想法吗?

r web

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

如何获取向量的所有连续子集?

如果我想获得矢量的所有子集,我可以使用sets包:

library(sets)
v <- c("test1", "test2", "test3", "test4")
set_power(v)
## {{}, {"test1"}, {"test2"}, {"test3"}, {"test4"}, {"test1",
##  "test2"}, {"test1", "test3"}, {"test1", "test4"}, {"test2",
##  "test3"}, {"test2", "test4"}, {"test3", "test4"}, {"test1",
##  "test2", "test3"}, {"test1", "test2", "test4"}, {"test1",
##  "test3", "test4"}, {"test2", "test3", "test4"}, {"test1",
##  "test2", "test3", "test4"}}
Run Code Online (Sandbox Code Playgroud)

我的问题我
如何只获得所有元素都是连续的所有子集,所以在上面的例子中没有{"test1", "test3"}, {"test1", "test4"}, {"test2", "test4"}, {"test1", "test2", "test4"}, {"test1", "test3", "test4"}

r subset

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

为什么is.na()会改变它的论点?

我刚刚发现了is.na()我不理解的函数的以下行为:

df <- data.frame(a = 5:1, b = "text")
df
##   a    b
## 1 5 text
## 2 4 text
## 3 3 text
## 4 2 text
## 5 1 text
is.na(df)
##          a     b
## [1,] FALSE FALSE
## [2,] FALSE FALSE
## [3,] FALSE FALSE
## [4,] FALSE FALSE
## [5,] FALSE FALSE
is.na(df) <- "0"
df
##   a    b  0
## 1 5 text NA
## 2 4 text NA
## 3 3 …
Run Code Online (Sandbox Code Playgroud)

r

11
推荐指数
1
解决办法
250
查看次数

最优雅的方式加载csv点与R中的千位分隔符

注意:据我所知,这个问题并不重复!我找到的所有问题/答案要么是如何从已经在R中的数据中消除点,要么在加载时如何将小数点更改为逗号.

我有一个csv,其数字如下:4.123,98.问题是因为.加载时输出变成了字符串矩阵read.table,read.csv或者read.csv2.更改dec到,于事无补.

我的问题
加载这个csv的最优雅的方法是什么,以便数字变成例如4123.98数字?

csv r decimal decimal-point decimalformat

9
推荐指数
1
解决办法
1491
查看次数

用R生成新的R徽标

R项目有一个新标识:

在此输入图像描述

因为它比旧的简单得多,所以应该可以使用R脚本生成它!还有人试过吗?

那应该很有趣!:-)

graphics r

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

如何重新定义cov来计算人口协方差矩阵

标准cov函数计算样本协方差矩阵,我希望得到总体协方差矩阵.

我尝试了以下方法:

cov.pop <- function(x,y=NULL) {
  cov(x,y)*(length(x)-1)/length(x)
}

> sapply(list(Apple,HP,Microsoft),cov.pop,y=Apple) #correct
[1] 0.7861672 0.1363396 0.2223303
> sapply(list(Apple,HP,Microsoft),cov.pop,y=HP) #correct
[1] 0.13633964 0.09560376 0.05226032
> sapply(list(Apple,HP,Microsoft),cov.pop,y=Microsoft) #correct
[1] 0.22233028 0.05226032 0.13519964
> cov.pop(cbind(Apple,HP,Microsoft)) #not correct
              Apple         HP  Microsoft
Apple     0.8444018 0.14643887 0.23879919
HP        0.1464389 0.10268552 0.05613145
Microsoft 0.2387992 0.05613145 0.14521443
Run Code Online (Sandbox Code Playgroud)

我的问题
是否有一种简单的方法来修改cov.pop函数以获得正确的种群协方差矩阵?

r covariance

7
推荐指数
1
解决办法
1586
查看次数

R中的矢量运算不一致?

我在大学教数学和编程(与R),我是一个良好和一致的符号的忠实粉丝.请看一下R中的以下简单向量运算:

> v1 <- c(1,2,3)
> v2 <- c(4,5,6)
> v1 %*% v2
     [,1]
[1,]   32
> t(v1) %*% v2
     [,1]
[1,]   32
> v1 %*% t(v2)
     [,1] [,2] [,3]
[1,]    4    5    6
[2,]    8   10   12
[3,]   12   15   18
> t(v1) %*% t(v2)
Error in t(v1) %*% t(v2) : non-conformable arguments
> v1 + v2
[1] 5 7 9
> v1 + t(v2)
     [,1] [,2] [,3]
[1,]    5    7    9
> t(v1) + t(v2)
     [,1] [,2] [,3] …
Run Code Online (Sandbox Code Playgroud)

r vector matrix-multiplication

5
推荐指数
1
解决办法
108
查看次数

是否有充分的理由使用`sort`和`index.return = TRUE`而不是`order`?

sort有index.return默认的参数FALSE.如果您将其设置为TRUE您获得订购索引...基本上与您使用时相同order.

我的问题
是存在的情况下是有意义的使用sort与index.return = TRUE代替order?

sorting r

5
推荐指数
1
解决办法
118
查看次数

使用R从csv文件(具有一些不一致性)创建zoo对象

我试图从以下csv文件在R中创建一个zoo对象:http: //www.cboe.com/publish/scheduledtask/mktdata/datahouse/Skewdailyprices.csv

问题似乎是从2006年2月27日到2006年3月20日(一些额外的逗号和"x")导致出现问题的时期存在一些轻微的不一致.

我正在寻找一种自动将完整的csv文件读入R的方法.每个工作日都有一个新的数据点,当进行手动预处理时,您必须每天手动重新编辑该文件.

我不确定这些是否是这个文件的唯一问题,但是我已经没有想法如何在这个时间序列中创建一个动物园对象.我认为有了更多关于R的知识,它应该是可能的.

csv r zoo

4
推荐指数
1
解决办法
1561
查看次数

如何排除 R 神经网络中的偏差神经元

我想使用 R 中的神经网络包训练神经网络 - 但不使用偏差节点。

我想我应该以某种方式使用exclude这个论点,但我不知道如何。

我的问题
例如,我如何训练一个具有 6 个输入神经元、3 个隐藏神经元和 7 个输出神经元的模型,但没有任何偏置神经元?

r neural-network

4
推荐指数
1
解决办法
822
查看次数