我只是在学习d3,我正在尝试从CSV文件导入数据,但我不断收到错误"XMLHttpRequest无法加载文件:///Users/Laura/Desktop/SampleECG.csv.交叉原始请求只是支持HTTP." 我已经搜索了如何修复此错误并在本地Web服务器上运行它,但我找不到适用于d3.v2.js的解决方案.以下是代码示例:
var Time = []
ECG1 = []
d3.csv("/Desktop/d3Project/Sample.csv", function(data)
{
Time = data.map(function(d) {return [+d["Time"]];});
ECG1 = data.map(function(d) {return [+d["ECG1"]];});
console.log(Time)
console.log(ECG1)
});
Run Code Online (Sandbox Code Playgroud)
任何帮助都感激不尽.
所以我试图比较不同的线性模型,以确定一个是否优于另一个.但是我有几个模型,所以我想创建一个模型列表然后调用它们.那可能吗?
Models <- list(lm(y~a),lm(y~b),lm(y~c)
Models2 <- list(lm(y~a+b),lm(y~a+c),lm(y~b+c))
anova(Models2[1],Models[1])
Run Code Online (Sandbox Code Playgroud)
谢谢您的帮助!
我对p值有疑问.我一直在比较不同的线性模型,以确定一个模型是否比另一个更好,在R中具有以下功能.
anova(model1,model2)
Run Code Online (Sandbox Code Playgroud)
不幸的是,偶尔它不会计算F或p值.这是一个没有给出p值的anova摘要的例子
Analysis of Variance Table
Model 1: Influence ~ SortedSums[, Combos2[1, A]] + SortedSums[, Combos2[2,A]]
Model 2: Influence ~ SortedSums[, B]
Res.Df RSS Df Sum of Sq F Pr(>F)
1 127 3090.9
2 128 2655.2 -1 435.74
Run Code Online (Sandbox Code Playgroud)
为了对称性,这里也是一个产生p值的anova总结.
Analysis of Variance Table
Model 1: Influence ~ SortedSums[, Combos2[1, A]] + SortedSums[, Combos2[2,A]]
Model 2: Influence ~ SortedSums[, B]
Res.Df RSS Df Sum of Sq F Pr(>F)
1 127 3090.9
2 128 3157.6 -1 -66.652 2.7386 0.1004
Run Code Online (Sandbox Code Playgroud)
你知道为什么会这样吗?
所以我在130X130的降序中一次排序一行矩阵,我想创建一个新的矩阵,其中行名称相同,但每个排序的行列名称是数据的位置和括号中的数据根据列名称旁边.它有点像创建一个尺寸为130x130x2的psuedo3D数组,然后将其压缩成一个没有列名的130x130矩阵.这是一个较小的例子.
例
A B C D
A 14 82 18 50
B 39 95 27 19
C 60 40 32 15
D 70 31 69 31
Run Code Online (Sandbox Code Playgroud)
这就是我要的
A B(82) D(50) C(18) A(14)
B B(95) A(39) C(27) D(19)
C A(60) B(40) C(32) D(15)
D A(70) C(69) B(31) D(31)
Run Code Online (Sandbox Code Playgroud)
我希望这是有道理的!
谢谢!
我逐个循环遍历矩阵,我想将所有小于1的值更改为负倒数.这是我目前拥有的循环
x <- 1:rowlength
y <- 1:colLength
for (i in x) {
for (j in y) {
Cell <- Nmatrix[i,j]
if (Cell<=1) {Cell = -1/Cell}
}
}
Run Code Online (Sandbox Code Playgroud)
我尝试运行代码时不断收到以下错误:
Error in if (Cell <= 1) { : missing value where TRUE/FALSE needed
Run Code Online (Sandbox Code Playgroud)
我不确定我做错了什么.任何帮助深表感谢.
谢谢
我很抱歉没有提供足够的信息来正确访问这个问题.无论如何,我想比较不同的线性模型对并将它们的p值记录到表中.我的麻烦在于我无法仅提取p值.
TC <- matrix(data=NA, nrow=1, ncol=6)
ML5 <- 1:5
for(B in ML5) {
Coop <- anova(M6,Models5[[B]])$"Pr(>F)"
TC[1,B] <- Coop
}
>Coop
NA 2.041767e-05
Run Code Online (Sandbox Code Playgroud)
那么我如何才将数字放入表中而不是将NA放入表中?
太感谢了!
r ×6
anova ×2
csv ×1
d3.js ×1
extraction ×1
for-loop ×1
if-statement ×1
javascript ×1
list ×1
lm ×1
matrix ×1
p-value ×1
reshape ×1
rowsum ×1