diff --git a/demo/OpenRepGrid.r b/demo/OpenRepGrid.r
index 2a92d70..2742537 100644
--- a/demo/OpenRepGrid.r
+++ b/demo/OpenRepGrid.r
@@ -22,9 +22,9 @@ biplotEsa2d(feixas2004)
 #### Pseudo 3D biplot #####
 biplotPseudo3d(feixas2004)
 
-#### 3D biplot #####
-x <- scan(n = 1)
-biplot3d(boeker)
+# #### 3D biplot #####
+# x <- scan(n = 1)
+# biplot3d(boeker)
 
 #### Bertin displays ####
 plot(0, type = "n", xaxt = "n", yaxt = "n", xlab = "", ylab = "")