Visit: http://moebius-band.ga

Code for generating an interactive Möbius band in R (using OpenGL)

library(rgl) # (Murdoch, 2001)
library(plot3D) # (Soetaert, 2014)
# Define parameters
R <- 3
u <- seq(0, 2 * pi, length.out = 100)
v <- seq(-1, 1, length.out = 100)
m <- mesh(u, v)
u <- m$x
v <- m$y
# Möbius strip parametric equations
x <- (R + v/2 * cos(u /2)) * cos(u)
y <- (R + v/2 * cos(u /2)) * sin(u)
# Visualise in 3-dimensional Euclidean space
bg3d(color = "white")
surface3d(x, y, z, color= "red")

icon-file https://christopher-germann.de/wp-content/uploads/A-non-dual-cognitive-neuroscience-perspective1.pdf
A-non-dual-cognitive-neuroscience-perspective