Here we use feTurbulence to create a wrinkled paper effect. Skip to output
svgR(wh=c(800,200),
rect(xy=c(0,0),wh=c(500,200),
filter=filter(
feDiffuseLighting( lighting.color="lightbrown",surfaceScale=2, result="diffLight",
feDistantLight(azimuth=45, elevation=35),
in1=feTurbulence( type="fractalNoise", baseFrequency=0.1, numOctaves=5, result="noise",
in1="SourceGraphic"
)
)
)
),
text(
paste("Omega:", mathSymbol("\\Omega")),xy=c(20,130),
stroke="none",stroke.width=1, font.size=100, font.weight="bold", fill="#555522", opacity=0.4
)
)