use x3p_image rather than image_x3p

CSAFE-ISU · May 23, 2024 · 74eb390 · 74eb390
1 parent b957c4c
commit 74eb390
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/app/server.R b/app/server.R
@@ -47,7 +47,7 @@ parse_rgluiprev <- function(x)
 render_land <- function(src,x3p,ccut)
 {
 	imgsrc <- gsub(".x3p$",".png",src)
-	image_x3p(x3p_sample(x3p_add_hline(x3p,yintercept = ccut, size = 20, color = "#ea2b1f"),m=5) %>% x3p_rotate(),zoom=1)
+	x3p_image(x3p_sample(x3p_add_hline(x3p,yintercept = ccut, size = 20, color = "#ea2b1f"),m=5) %>% x3p_rotate(),zoom=1)
 	snapshot3d(imgsrc,webshot=TRUE)
 	return(imgsrc)
 }