Data 我正在R上研究Copula。我已经绘制了copula,但是我想像在这里看到的图像一样向其中添加点。我该怎么做?我的数据包括x和y,我将它们分别转换为u和v。我需要将点添加到绘图中。但是它什么也没显示。当我添加点时,我收到此错误“ cbind(x,y,z,1)%*%pmat中的错误:需要数字/复杂矩阵/矢量参数”
library(copula)
library(lmomco)
library(VineCopula)
data <- read.csv('D:/test2.csv',header=F)
x <- data[,1]
y <- data[,2]
u <- pobs(x)
v <- pobs (y)
m <- cbind(u,v)
scopula <- r270GumbelCopula(-3)
fit1 <- fitCopula(scopula,m,method='mpl')
res <- persp(scopula, pCopula, zlim = c(0,1))
points(trans3d(m[,1], m[,2], pcop1, pmat = res), col = 2, pch = 16)