Jak tworzyć wykresy 3d w r (z przykładami)

Najprostszym sposobem na utworzenie wykresu 3D w R jest użycie funkcji persp() .

 persp(x, y, z)

Poniższe przykłady pokazują, jak w praktyce wykorzystać tę funkcję.

Przykład 1: Podstawowy wykres 3D

Poniższy kod pokazuje, jak utworzyć podstawowy wykres 3D:

 #define x and y
x <- -10:10
y <- -10:10

#define function to create z-values
z_values <- function (x, y) {
  sqrt(x^2 + y^2)
}

#create z-values
z = outer(x, y, z_values)

#create 3D plot
persp(x, y, z) 

Przykład 2: Niestandardowy wykres 3D

Poniższy kod pokazuje, jak dostosować etykiety osi, tytuł, kolor i cień wykresu:

 #define x and y
x <- -10:10
y <- -10:10

#define function to create z-values
z_values <- function (x, y) {
  sqrt(x^2 + y^2)
}

#create z-values
z = outer(x, y, z_values)

#create 3D plot
persp ( x , y, z, xlab= '
      main=' 3D Plot ', col=' pink ', shade= .4 )

Przykład 3: Obróć wykres 3D

Poniższy kod pokazuje, jak obrócić wykres 3D, aby ułatwić jego przeglądanie, używając argumentów theta i phi :

 #define x and y
x <- -10:10
y <- -10:10

#define function to create z-values
z_values <- function (x, y) {
  sqrt(x^2 + y^2)
}

#create z-values
z = outer(x, y, z_values)

#create 3D plot
persp ( x , y, z, xlab= '
      main=' 3D Plot ', col=' pink ', shade= .4 , theta= 30 , phi= 15 ) 

Przykład 4: Dodaj znaczniki do wykresu 3D

Poniższy kod pokazuje, jak użyć argumentu ticktype , aby dodać znaczniki z etykietami do każdej osi:

 #define x and y
x <- -10:10
y <- -10:10

#define function to create z-values
z_values <- function (x, y) {
  sqrt(x^2 + y^2)
}

#create z-values
z = outer(x, y, z_values)

#create 3D plot
persp ( x , y, z, xlab= '
      main=' 3D Plot ', col=' pink ', shade= .4 , theta= 30 , phi= 15 , ticktype=' detailed ' ) 

Dodatkowe zasoby

Poniższe samouczki wyjaśniają, jak tworzyć inne popularne wykresy w R:

Jak wykreślić wiele linii na wykresie w R
Jak wykreślić wiele wykresów skrzynkowych na jednym wykresie w R
Jak utworzyć wykres Pareto w R
Jak tworzyć mapy radarowe w R