Quantcast

Posted on Sunday, 1 December 2013

the sine of the reciprocal of [some angle between −1/π and 1/π]

at increasing resolution

s <- function(x) sin( 1/x )
    plot( s, xlim=c(-1/pi, 1/pi), col=rgb(0,0,0,.7), type = "l", ylab="output", xlab="input", main="compose [multiplicative inverse] with [vertical rect of a circle]" )

(Source: amzn.to)







231 notes

  1. funcoolmathgames reblogged this from visualizingmath
  2. ofspiralsandmen reblogged this from visualizingmath
  3. q-lvck reblogged this from isomorphismes
  4. wisdomisaround reblogged this from isomorphismes
  5. always-dawn reblogged this from visualizingmath
  6. blackskiesonfire reblogged this from parametricworld
  7. soulstructure reblogged this from parametricworld
  8. parametricworld reblogged this from visualizingmath
  9. dragonsdayfilms reblogged this from visualizingmath and added:
    #MindWorks
  10. 6ytr9 reblogged this from cametek
  11. coolthingsswd reblogged this from visualizingmath
  12. toogoodforasimplesong reblogged this from visualizingmath
  13. isomorphismes posted this