将点添加到persp方法图上

时间:2018-12-05 23:23:32

标签: r plot 3d

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)

example of Map I want to create

What I can create so far

0 个答案:

没有答案