将dcopula.t与R QRM中的向量一起使用，apply...dim(X)中的错误必须为正长度
dcopula.t是一个R语言中的函数，用于生成t分布的依赖结构。R QRM是R语言中的一个包，用于金融风险管理。在使用dcopula.t函数时，如果出现错误"apply...dim(X)中的错误必须为正长度"，这通常是由于输入的数据维度不正确导致的。
要解决这个错误，首先需要确保输入的数据是一个正确的矩阵或数据框。可以使用函数dim()来检查数据的维度，确保它是一个非空的矩阵。
另外，还需要检查向量的长度是否正确。在使用apply函数时，它要求输入的向量长度必须是正的，即大于0。如果向量的长度为0或负数，就会出现上述错误。
如果出现错误的原因不是数据维度或向量长度的问题，可能是由于其他代码逻辑错误导致的。此时，需要仔细检查代码，确保所有的变量和函数调用都是正确的，并且符合dcopula.t函数的要求。
总结起来，解决"apply...dim(X)中的错误必须为正长度"的方法如下：
- 检查输入数据的维度，确保它是一个非空的矩阵或数据框。
- 检查输入向量的长度，确保它是一个正数。
- 检查代码逻辑，确保所有的变量和函数调用都是正确的，并且符合dcopula.t函数的要求。
腾讯云相关产品和产品介绍链接地址：
- 腾讯云云服务器（CVM）：https://cloud.tencent.com/product/cvm
- 腾讯云云数据库 MySQL 版：https://cloud.tencent.com/product/cdb_mysql
- 腾讯云人工智能平台（AI Lab）：https://cloud.tencent.com/product/ailab
- 腾讯云物联网平台（IoT Hub）：https://cloud.tencent.com/product/iothub
- 腾讯云移动开发平台（MPS）：https://cloud.tencent.com/product/mps
- 腾讯云对象存储（COS）：https://cloud.tencent.com/product/cos
- 腾讯云区块链服务（BCS）：https://cloud.tencent.com/product/bcs
- 腾讯云元宇宙服务（Tencent Cloud Metaverse）：https://cloud.tencent.com/product/metaverse
相关·内容
1回答
在我的研究中，我需要从均匀分布随机生成稀疏(复值)么正矩阵。对于我来说，使用下面的代码来生成通用么正矩阵不是问题：
X = (randn(n) + i*randn(n))/sqrt(2);
[Q,R] = qr(X);
R = diag(diag(R)./abs(diag(R)));
U = Q*R;
然而，我不知道如何生成矩阵的稀疏版本，我也没有在互联网上找到。你能在这方面给我指点一下吗？
浏览 0提问于2019-11-21得票数 1
基本上，我的代码涉及一个创建的表，其中最后一列作为前两列的和，第一列来自表X，第二列来自“表X与表Y的内连接”。
但是，我想将所有这三列按“对手方”分组，这是一个变量，它既存在于“表X”中，也存在于“表X与表Y的内连接”中。
棘手的部分是，我们将有一些对手方的数据集1(来自表X)和一些对手方，我们有数据集2(来自表X的内连接表Y)和一些我们有两个数据集！我想包括交点以及离群点，但只有在对照了交易对手的主密钥(称为c.COUNTERPTY )之后才能这样做。
请仔细阅读下面的代码，看看上面的解释如何与手头的问题相关。我对代码的长度表示歉意。
select
p.Name as ENTITY, t
浏览 1提问于2015-01-23得票数 0
回答已采纳
可能重复：
在R中，空(&，|)和长(&&，||)形式和，或逻辑运算符有什么区别？
例如：
x==0 & y==1x==0 && y==1x==0 | y==1x==0 || y==1
我总是在代码中使用简短的表单。有什么障碍吗？
浏览 0提问于2011-10-31得票数 7
回答已采纳
2回答
我有这个密码
dens <- read.table('DensPiu.csv', header = FALSE)
fl <- read.table('FluxPiu.csv', header = FALSE)
mydata <- data.frame(c(dens),c(fl))
dat = subset(mydata, dens>=3.15)
colnames(dat) <- c("x", "y")
attach(dat)
我想对dat中包含的数据进行最小二乘回归，函数有以下形式
y ~ a +
浏览 2提问于2013-06-04得票数 8
回答已采纳
我注意到很多R黑客做了这样的事情：
> matrix(c(1,2,3,4,5),nrow=5,ncol=10,byrow=FALSE)
[,1] [,2] [,3] [,4] [,5] [,6] [,7] [,8] [,9] [,10]
[1,] 1 1 1 1 1 1 1 1 1 1
[2,] 2 2 2 2 2 2 2 2 2 2
[3,] 3 3 3 3 3 3 3 3 3 3
[4,]
浏览 2提问于2014-02-19得票数 3
回答已采纳
我写了下面的代码用于自适应线性组合器(最陡峭的下降)与随机信号添加在input.:M=16；
M=16;
k=[1:200];
R=[0.5 0.46;0.46 0.5];
P=[0;-0.38];
wstar=[-5 30];
s=sin((2*pi*k)/M); %input signal
d=cos((2*pi*k)/M); %desired signal
**x=s+randn(1,M);** %input signal + noise
mu=1;
for i=1:M %steepest descent algorithm
w(1)=wstar;
浏览 0提问于2013-02-22得票数 0
回答已采纳
1回答
假设我有一个长度为100的向量x，在Matlab中，我可以运行fft(x,32)来得到长度为32的复向量。
但是如何在R中实现呢？
fft(x,32)不能工作，仍然会返回长度为100的复向量。
浏览 1提问于2016-07-26得票数 1
回答已采纳
我目前正在为RM3100磁强计开发一个驱动程序，但是我遇到了读写寄存器的问题。目前，我正在尝试读取状态寄存器，以确定传感器是否正在收集数据；然而，每次我都得到一个零。我试图访问寄存器的方式有问题吗？或者我的代码中有错误吗？
C++文件：
#include "Arduino.h"
#include "QRM3100.h"
#include <Wire.h>
#include <math.h>
#define CALIBRATION_TIMEOUT 5000 //timeout in milliseconds
#define DEG_PER
浏览 4提问于2018-05-23得票数 0
下面是一个例子：
boltzmann <- function(x, t=0.1) { exp(x/t) / sum(exp(x/t)) }
z=rnorm(10,mean=1,sd=0.5)
exp(z[1]/t)/sum(exp(z/t))
[1] 0.0006599707
boltzmann(z)[1]
[1] 0.0006599707
看起来boltzmann函数中的exp对元素和向量进行操作，并且知道什么时候做正确的事情。sum是否“展开”输入向量并将表达式应用于值？有人能解释一下这在R中是如何工作的吗？
编辑:感谢您对R n00b的所有评论、澄清和耐心。总而言之，这种工作的原因
浏览 1提问于2013-03-04得票数 1
回答已采纳
3回答
我试图遵循一个代数方程，并将其转换为c++。
我被困在：
Calculate the radius as r = ||dp||
其中dp是向量，并且：
dp = (dx,dy)
根据我的google搜索，r=\\dp\x中的垂直条意味着我需要对向量进行规范化。
我有：
std::vector<double> dpVector;
dpVector.push_back(dx);
dpVector.push_back(dy);
我应该如何规范这一点，以使它返回一个双倍为'r'？
浏览 5提问于2015-11-19得票数 2
回答已采纳
我有一个关于wilcox.test()函数中的法线近似的问题。
我直觉地期望这些计算的结果是相同的：
vec1 <- c(10,11,12)
wilcox.test(vec1,rep(0,10),exact=FALSE,correct = FALSE)
wilcox.test(vec1,c(runif(8),0,0),exact=FALSE,correct=FALSE)
但情况远非如此。(0.0006056比0.01112)
来自wilcox.test文档：
如果样本包含小于50个有限值，且没有联系，则计算精确p值。否则，采用正态近似。
我不清楚如何根据文档计算正态近似。搜寻网(如：(
浏览 0提问于2015-05-21得票数 0
回答已采纳
1回答
我需要一些关于Direct3D的概念上的帮助...函数。在他们的官方文档中，他们说发生的计算可以总结为：
Z轴=法线(眼点)x轴=法线(交叉(向上，z轴)) yaxis =交叉(z轴，x轴)
xaxis.x yaxis.x zaxis.x 0 xaxis.y yaxis.y zaxis.y0 xaxis.z yaxis.z zaxis.z 0-dot(x轴，眼睛)-dot(y轴，眼睛)-dot(z轴，眼睛)l
现在我不明白的是，前两行中使用的'normal()‘函数做了什么？我怎么能用两个向量来计算正态呢?！法线不是为飞机计算的吗?！
在第二行中，normal()只作用于一个向量(因为
浏览 0提问于2010-09-23得票数 0
回答已采纳
我使用以下代码为2013年德国选举结果创建一个带有R的议会席位图。
我想改变每一方的颜色(CDU/CSU ->红色，SPD ->蓝色，Linke ->黄色和Gruene ->绿色)。当我尝试这样做的时候，颜色似乎是随机出现的，破坏了图表中各方的序列。
我也想去掉黑色的轮廓图，只留下座位图可见。
VoteGermany2013 <- data.frame(Party=c( "CDU/CSU", "SPD", "LINKE","GRUENE"),
Re
浏览 0提问于2015-03-07得票数 6
回答已采纳
我可以使用lapply，sapply，mapply来下载web。
urls <- c(
"http://stat.ethz.ch/R-manual/R-devel/library/base/html/connections.html",
"http://en.wikipedia.org/wiki/Xz")
x1=lapply(urls,readLines)
x2=sapply(urls,readLines)
x3=mapply(con=urls,readLines)
在本例中如何使用vapply？
浏览 6提问于2012-08-31得票数 1
回答已采纳
1回答
我从ifelse函数中得到了意想不到的结果：
vector <- factor(c('x', 'x', 'y', 'z'), levels = c('x', 'y', 'z'))
ifelse(class(vector) == "factor", yes = levels(vector), no =
unique(vector)) # Returns character "x" and not the expected c("x"
浏览 3提问于2017-12-14得票数 3
回答已采纳
我只是想知道我可以在R中使用什么功能或R代码，这相当于microsoft excel表中的“趋势函数”。因为excel中的趋势函数等于“沿线性趋势返回值。趋势适合于已知_y和已知_x数组的直线(使用最小二乘法)。为指定的新_x数组返回沿这条线的y值”。我在excel工作表中有两列columnY=“吸光度”和columnX =“浓度”，通过使用这两列，我需要计算new的值，该列沿该行返回我指定的新_x数组的y值。我的新的_x是未知的吸光度，在'R‘中做这件事最简单的方法是什么，因为我花了很多时间在Excel上做它。我在excel表中有许多(近300)个新_x的值，需要使用columnY和
浏览 2提问于2017-03-23得票数 1
当事情变得有点有趣时，我正在尝试粘贴函数，我想了解为什么连接c()在这里的工作方式非常不同。
正如您所看到的，我已经实现了两种不同的场景。
1)
paste("X","Y",1:10)
2)
paste1<-paste(c("X","Y"),1:10,sep="")
(1)个案1的输出：-
"X Y 1" "X Y 2" "X Y 3" "X Y 4" "X Y 5" "X Y 6" "X Y
浏览 1提问于2019-09-06得票数 2
回答已采纳
3回答
设x为向量
[1] "hi" "hello" "Nyarlathotep"
有没有可能从x s.t中产生一个向量，比如说y。它的组件是
[1] "hi" "hello" "Nyarl"
换句话说，我需要在R中使用一个命令来将文本字符串剪切到给定的长度(在上面的例子中是length=5)。
非常感谢!
浏览 1提问于2013-09-05得票数 9
回答已采纳
1回答
素食者中的R大距离矩阵
、、、
我在一台拥有128 GB内存的机器上运行R3.2.3。我有一个123028行x 168列的大矩阵。我想在R中使用分层聚类算法，因此在这样做之前，我尝试用Bray方法在纯素包中使用vegdist()函数在R中创建一个距离矩阵。我得到了一个内存分配错误：
df <- as.data.frame(matrix(rnorm(20668704), nrow = 123028))
library(vegan)
mydist <- vegdist(df)
素食主义错误(Df)：.Fortran不支持长向量(参数4)
如果我使用pryr包来找出距离矩阵需要多少内存，我就会发现需要121 G
浏览 3提问于2015-12-14得票数 4
回答已采纳
所以我有一个错误...
f <- function(x){return(1)}
curve(f(x),0,100,xname="x")
Error in curve(f(x), 0, 100, xname = "x") :
'expr' did not evaluate to an object of length 'n'
这很奇怪考虑到
F <- function(x){return(0*x+1)}
curve(F(x),0,100,xname="x")
效果很好...这让我开始思考R是如何对待d
浏览 5提问于2015-03-11得票数 1
一月认证请求中的transactionId是什么？它是如何在哪里产生的？是客户端还是服务器操作？
vbkw426dlmlndqn25k2yyk7fu5qrm3vrr005n3ht&cache=1484090422952
浏览 5提问于2017-01-10得票数 0
回答已采纳
使用R，ifelse()命令似乎将我保存(并重新加载)的模型的类更改为列表，而不是将其保留为"glm“。
下面是演示这个问题的代码：
x1 <- c( 1:10 )
x2 <- c( 1, 1, 1, 0, 0, 0, 1, 1, 1, 0 )
y <- c( 1, 0, 0, 1, 1, 0, 0, 1, 1, 1 )
dataset <- as.data.frame( cbind( y, x1, x2 ) )
m <- glm( y ~ x1 + x2, family = binomial )
saveRDS( m, "test.rds&#
浏览 4提问于2022-10-08得票数 0
这可能是一个非常基本的R，question...and，对asking...but有一点不好的感觉，有没有像==，|，!，&之类的代码来执行下面的逻辑函数？
如果
x ==向量y中包含的元素/的任意值
那么是真的
否则
错误
浏览 2提问于2012-10-19得票数 3
回答已采纳
2回答
我有一个R数据框：
a <- 1:12
list <- c(rep("x",3),rep("y",4),rep("z",3),rep("x",2))
data <- data.frame(a,list)
data
a list
1 x
2 x
3 x
4 y
5 y
6 y
7 y
8 z
9 z
10 z
11 x
12 x
我想创建一个新列，它在每次"
浏览 0提问于2012-10-29得票数 8
回答已采纳
1回答
我试着读取一个由62列和2000行组成的excel 2003文件，然后在matlab中绘制2000年两类数据模式的2d树状图。当我运行这个脚本时，它会给出上面的错误。我也不知道原因。有人知道我为什么会犯上述错误吗？
我的数据在这里：
如果要使用数据进行测试，请删除2001列。
我的代码在这里：
% Script file: cluster_2d_data.m
d=2000; n1=22; n2=40; N=62
Data=xlsread('data.xls','A1:BJ2000');
X=Data';
R=1:2000;
C=1:2;
浏览 0提问于2010-05-05得票数 1
x1 = c(1,2,3,4,5,6,7)
x1
[1] 1 2 3 4 5 6 7
x1[which(x1== c(5,6))]
[1] 5 6
Warning message:
In x1 == c(5, 6) :
longer object length is not a multiple of shorter object length
当我退出R，然后重新打开R时，我得到的结果是：
x1 = c(1,2,3,4,5,6,7)
x1
[1] 1 2 3 4 5 6 7
x1[which(x1== c(5,6))]
[1] 5 6
警告消息将消失。为什么？
浏览 0提问于2012-09-23得票数 0
1回答
我想用SIMD指令将下面的fortran矢量化
!DIR$ SIMD
DO IELEM = 1 , NELEM
X(IKLE(IELEM)) = X(IKLE(IELEM)) + W(IELEM)
ENDDO
我使用了avx2指令。这个程序是由
ifort main_vec.f -simd -g -pg -O2 -vec-report6 -o vec.out -xcore-avx2 -align array32byte
那么我想在VECTORLENGTH(n)之后添加SIMD子句。如果没有这样的子句或n= 2，4，则信息不会提供有关展开因子的信息。
如果n= 8，1
浏览 1提问于2015-08-18得票数 4
1回答
我想用pygame做一个2D游戏，为了做到这一点，我想使用数学矩阵。虽然我的想法是对的但我有个问题。这就是：，我做了一个随机点，我计算它的向量的长度(从0，0开始)，然后，通过矩阵变换(2D)的方程，我想移动那个点，比如说+1度。我得到了一个结果，但是等等，为什么转换后的向量的长度和另一个不同？我们将非常感谢您的回答，谢谢:)
下面是我的代码：
import numpy
import math
import random
#length of wector
def R(w0):
#start point coordinates
x0 = y0 = 0
#new
浏览 2提问于2016-04-13得票数 0
3回答
我一直在跟踪编解码者关于SAT和MTV的教程，并试图自己实现它，但当涉及到获得正确的MTV时，我已经非常高兴了。这里是我的例子：(提示漂亮的图片.)
📷
我很清楚如何获得MTV的长度和它所在的轴。然而，我不知道长度应该是“正”还是“负”，才能把物体推向正确的方向。
在示例中，我们通过移动“蓝色”的“红色”来分隔对象，最上面的例子是负移动对象，底部则是正移动对象。
请帮帮我，我真的很纠结。
这是我的实际实现。
浏览 0提问于2012-04-17得票数 7
回答已采纳
我正在尝试向dataframe添加一个列，并且我使用了rep()函数。为什么第一行起作用，而下一行却不行？
> S_Grime$Græsning=rep(1:2, 50:49)
> R_Grime$Græsning=rep(1:2, 34:27)
Error in rep(1:2, 34:27) : invalid 'times' argument
我的数据：
> head(S_Grime)
# A tibble: 6 x 3
Feltnummer value Græsning
<dbl> <dbl> <i
浏览 0提问于2020-10-22得票数 2
回答已采纳
1回答
我在试着计算坐标偏差。我得到的偏差可以是正的，也可以是负的。 我有标称的x，y，z坐标，和实际的x，y，z坐标。但无论我尝试哪种方法，结果都是正数。这就说得通了。但我需要保持负偏差为负。它看起来是这样的： a = (float(nX), float(nY), float(nZ))
b = (float(aX), float(aY), float(aZ))
plt.mlab.dist(a, b) 如果我使用这些坐标作为例子：-9.69498 13.53853 43.00000 -9.69941 13.53559 43.00029，他们必须给我一个负偏差-0.005 (四舍五入) 如何做到这一点
浏览 17提问于2019-05-13得票数 0
回答已采纳
我偶然发现了一些奇怪的东西，我不知道为什么r会有这样的行为。我有一个向量，取值范围为1:100 (vec100)。现在我只想得到小于50的值。通常，我会编写vec100vec100<50，并且会很高兴。但是今天，出于演示的原因，我使用了分配给对象x的逻辑vec100<50。为了表明这种方法是危险的，因为它选择的是位置而不是值本身，我从另一个向量vec2 <- c(vec100,20,50,100,10)中选择了x。有趣的是，它还返回那些附加值，尽管它们超出了x的范围，但我找不到它为什么会这样做的原因。
vec <- 1:100
x <- vec<50 #lo
浏览 15提问于2021-03-09得票数 1
回答已采纳
我有通量随时间变化的数据，并希望获得一个时间列表，当通量从负值变为正数，反之亦然。这似乎是一个简单的事情，所以它可能有一个简单的答案，但我还没有找到一个我的搜索条件。
样本数据：
day=c(1,2,3,5,10,20)
flux=c(-2,-4,1,-2,4,11)
我想得到类似于向量crossover_times= (2.5，4，7.5)的信息，以指示发生变化的插值天数，以及理想情况下指示符号变化方向的信息，例如sign_changes =(正、负、正)。
当然，我可以编写一个循环来迭代数据，但我猜想R有一个或多个有用的函数。有什么建议吗？
浏览 6提问于2014-08-02得票数 3
回答已采纳
2回答
我需要得到一个方向向量x，y来精确地偏离点所在的圆。
我试着把x和y坐标分配到点上，但它们都指向同一个方向。
r = 70 # radius of circle
a = 0 # angle var
#create a while loop as long as the angle is bellow 2pi
while a < pi*2:
# create an x and a y coordinate around the circle
x = int(r * cos(a)) + 200
y = int(r * sin(a)) + 200
# add
浏览 0提问于2019-08-27得票数 0
回答已采纳
2回答
我试图在R中求解一个非线性方程组，但它总是给我这样的错误：“要替换的项数不是替换长度的倍数”。
我的代码如下所示：
my_data <- Danske
D <- my_data$D
V <- my_data$V
r <- my_data$r
s <- my_data$s
fnewton <- function(x)
{
y <- numeric(2)
d1 <- (log(x[1]/D)+(r+x[2]^2/2))/x[2]
d2 <- d1-x[2]
y[1] <- V - (x[1]*pnorm(
浏览 3提问于2014-04-11得票数 0
1回答
我知道外面有很多问题，但这行不通。给出了logistic回归模型的决策边界。但我的决定边界图远没有预期的那么接近。我还没有提取新的数据来验证分类器，但是，我的损失看起来和预期的一样，并且正在很好地收敛。请在下面找到我的密码。
Edit1: --我现在已经尝试了几种解决方案和方法来绘制决策边界，它看起来总是一样的，所以我的参数一定有问题。有人知道会是什么吗？
Edit2:由于沮丧，我随机地将决策边界的参数更改为y = (-(w[2]+w[0].item()*x)/w[1]).T，现在它开始工作了。有人知道我为什么让两个人扭来扭去吗？
这就是我要得到的。我做错了什么？
import nu
浏览 3提问于2020-01-19得票数 0
回答已采纳
2回答
我有一些真实和预测的标签
truth <- factor(c("+","+","-","+","+","-","-","-","-","-"))
pred <- factor(c("+","+","-","-","+","+","-","-","+","-"))
我
浏览 2提问于2013-07-30得票数 2
回答已采纳
1回答
我试图弄明白我可以使用旋转矩阵的所有方法(抱歉，因为不可读)：R(x) = cos(x) -sin(x)；sin(x) cos(x)
有两种类型的坐标系(CS)：CS1 -->正x轴向右和正y轴向上，这显然是人们使用的标准方向。CS2 -->正x轴向右，正y轴向下。
我搞不懂的是插入R(x)时x角的符号。根据数值的符号，角度可以逆时针或顺时针旋转(在任意向量上)，但是对于哪个CS方向和另一个方向将如何表现？
此外，如果你能解释比维基百科更多的关于不在场证明和别名转换的内容，那就太好了。在哪个中考虑旋转是最好的？如果我在别名方法中思考，我是否必须使用相反的符号表示角度x。这就是我所指
浏览 3提问于2012-06-02得票数 0
1回答
R中的插值大光栅级数
、、、
我有36年的网格/栅格月温度估计，我想转换成每日的估计。现在，我将每月的估计值设为月中点，并做一个简单的线性插值。为此，我尝试使用这个中描述的raster::calc和stats::approx。但是，在这样做时，我会得到以下错误：
is.infinite(v)中的错误:未为“list”类型实现默认方法
下面是一些代码，希望能够提供一个模拟类型来重新创建这个问题。我认为问题在于NA是如何处理的，因为最终的q_interp位(没有栅格设置为NA)。尽管如此，我不知道该如何处理这些信息。
library(raster)
#The parameters of the problem
num
浏览 1提问于2017-01-07得票数 1
回答已采纳
2回答
我正在调试R代码，我对R中的lag函数是如何工作的感到非常困惑。例如
> x=c(0)
> x
[1] 0
> lag(x)
[1] 0
attr(,"tsp")
[1] 0 0 1
另一个例子
> x=c(0,0,0,1)
> x
[1] 0 0 0 1
> lag(x)
[1] 0 0 0 1
attr(,"tsp")
[1] 0 3 1
有人能用简单的英语解释一下lag函数到底是做什么的吗？
我特别关心返回值是如何计算的。
请记住，这个问题来自试图学习R的程序员，而不是统计学家。
浏览 0提问于2014-08-26得票数 3
回答已采纳
1回答
我想要计算R中时间序列的任何类型的“移动统计”，而不是移动平均值。例如，如何计算长度为3的时间窗口内的移动标准差？
我尝试过以下几种方法：
#example data
x <- c(3,9,2,8,4,6,5,8)
#moving standard deviation over a time window of length 3
msd3 <- (cumsum(x^2)-cumsum(Lag(x^2,3)))/((1:length(x))-(Lag(1:length(x),3)))-((cumsum(x)-cumsum(Lag(x,3)))/((1:length(x))-(Lag(
浏览 1提问于2013-02-18得票数 0
ave()和mean()函数在R中的区别是什么？
例如，我试图找出R中数据的某一列的平均值？
我偶然发现了这两个功能：
mean(dataset$age, na.rm= TRUE)
ave(dataset$age, FUN=function(x)mean(x, na.rm = TRUE))
第一个函数清楚地给出了平均值作为一个值。而第二个函数也给出了平均值，但元素的数量与数据行中不缺少的值一样多。为什么会这样呢？当mean整洁地给出ave时，像ave()这样的函数又有什么用呢？
浏览 0提问于2019-08-12得票数 4
我想编写一个函数来重命名矩阵行和列。
我的职责是
changeMatrixName<- function(mat){
nameRow<-vector(mode="character",length=nrow(mat))
nameCol<-vector(mode="character",length=ncol(mat))
nameCol<- colnames(mat)
nameRow<- rownames(mat)
#annotation[annotation$probeID==c(&
浏览 4提问于2014-02-28得票数 0
回答已采纳
我正试着让我的玩家发射一个咒语，它会传播到玩家点击的任何地方。通过执行以下操作，我可以轻松地完成这一任务。
if(position.x >= destination.x - 1 && position.x <= destination.x + 1)
reachedX = true;
if(position.y >= destination.y - 1 && position.y <= destination.y + 1)
reachedY = true;
但是，如果玩家的起源是0,0，而我点
浏览 0提问于2015-11-03得票数 1
回答已采纳
1回答
计算两点之间的直接欧几里德距离相当简单：
import torch
p1 = torch.tensor([1.0, 3.5])
p2 = torch.tensor([5.0, 9.2])
dis = torch.sum(torch.square(p1-p2))
dis
>>> tensor(48.4900)
但是，如果不经过圆，如何计算圆上两点之间的距离？也就是说，圆周上的距离，在D维空间中。
显然，在2D中，圆只是一个圆：
import numpy as np
import matplotlib.pyplot as plt
def circle_points(r, n)
浏览 19提问于2021-05-20得票数 3
回答已采纳
2回答
我正在尝试学习R；我正在编写一个函数来返回一个数字的(适当的)除数。在Python中，我可以使用filter方法，如下所示：
def divisors(n):
numbers = list(range(1,n))
an_iterator = filter(lambda x: n % x ==0, numbers)
return(list(an_iterator))
写这种函数的好方法是什么，这一次用R中的向量工作？到目前为止我有这样的想法：
divisors <- function(n){
vec <- 1:(n-1)
vec <- ifels
浏览 4提问于2020-08-03得票数 0
回答已采纳
1回答
我按照教程在R中实现支持向量机。
我很难弄清楚绘图命令的工作原理
plot(x,col=ifelse(y>0,1,2))
正如length(x)所确认的，X的大小为300，但length(ifelse(y>0,1,2)显示的大小为150。
那么，如果有300x值，但只有150个y值，那么这个图是如何工作的呢？
当我试着
plot(x,ifelse(y>0,1,2))它显示了预期的错误
Error in xy.coords(x, y, xlabel, ylabel, log) :
'x' and 'y' lengths differ
col
浏览 2提问于2014-01-30得票数 0
回答已采纳
1回答
我正在阅读提供的Hadley的高级R。他谈到了sapply和vapply之间的区别。我的问题是关于使用vapply而不是sapply，他在示例中没有进一步讨论这个问题。
这是他的密码：
df2 <- data.frame(x = 1:10, y = Sys.time() + 1:10)
sapply(df2, class)
这会返回
$x
[1] "integer"
$y
[1] "POSIXct" "POSIXt"
但是，当我运行vapply时，会得到一个错误。
vapply(df2, class, character(1))
错误：
浏览 1提问于2017-04-19得票数 2
回答已采纳
1回答
我有数千个txt文件(1.txt；2.txt；3.txt.)用作输入(预测)和另一个称为“标签”的文件。我需要运行几个命令来创建它们各自的输出(AUC值)。我在前一篇文章()中使用了这个建议。
但是我在创建包含在这个循环中的函数时遇到了困难。
我的原始代码(用于一个文件predictions)：
library(ROCR)
labels <- read.table(file="/data/labels/labels", header=F, sep="\t")
predictions <- read.table(file="/data/inpu
浏览 4提问于2020-06-01得票数 0
回答已采纳
我在R中有一个列表列表，我想把它转换成一个列表数组，但我只得到一个列表列表的数组：
r <- list(list(a=1, b=NULL, c=NULL, d=1.23),
list(a=2, b=NULL, c=NULL, d=3.32),
list(a=3, b=NULL, c=NULL, d=2.13),
list(a=4, b=NULL, c=NULL, d=3.25),
list(a=5, b=NULL, c=NULL, d=0.14),
list(a=6, b=NULL, c=
浏览 2提问于2012-12-30得票数 3
回答已采纳
扫码
添加站长 进交流群
领取专属 10元无门槛券
手把手带您无忧上云
相关资讯
热门标签
云服务器
ICP备案
实时音视频
对象存储
即时通信 IM活动推荐
腾讯云开发者
