Я пытаюсь сделать контурный сюжет.Изображение - это информация для создания матрицы z и заполнения ее значениями f (x, y) для каждой комбинации значений x и y. Нажмите для изображения .Это та часть, с которой я борюсь, независимо от того, как я пытаюсь вставить функцию f (x, y) в код, она просто не работает.Мы будем благодарны за любую помощь.
Ниже приведен код, который у меня есть.
y <- seq(-3.00,3.00,0.05)
z <- matrix(0,121,121)
p <- 3.1415
s <- sqrt(3)
for(i in 1:121) {
for(j in 1:121) {
z[i,j] <- 1/p*s*exp[-2*(x^2+y^2-x*y)/3]
}}
contour(x,y,z,col="red")