File:Hilbert Curve - 6.webm

From Wikimedia Commons, the free media repository
Jump to: navigation, search
Hilbert_Curve_-_6.webm(WebM audio/video file, VP8, length 51 s, 360 × 360 pixels, 111 kbps overall)

Summary[edit]

Description
English: Hilbert Curve at its sixth iteration
Date
Source Own work
Author CalmWords

VectorRotater[{x_, y_}, \[Theta]_, {x0_,

  y0_}] := ({{Cos[\[Theta]], -Sin[\[Theta]]}, {Sin[\[Theta]], 
      Cos[\[Theta]]}}.Transpose[{{x, y} - {x0, y0}}] + {x0, y0}) // 
 Flatten

VectorScaler[{x_, y_}, r_, {x0_, y0_}] :=

 r*({x - x0, y - y0}) + {x0, y0};

HilbertCurve[n_] := (

 HilbertCurve[n] =
  If[n == 1,
   {{1/4, 1/4}, {1/4, 3/4}, {3/4, 3/4}, {3/4, 1/4}},
   prev = HilbertCurve[n - 1];
   scaledPrev = VectorScaler[#, 1/2, {1/2, 1/2}] & /@ prev;
   scaledPrevRot1 = 
    Reverse[VectorRotater[#, \[Pi]/2, {1/2, 1/2}] & /@ scaledPrev];
   scaledPrevRot2 = 
    Reverse[VectorRotater[#, -\[Pi]/2, {1/2, 1/2}] & /@ scaledPrev];
   Join[
    {-1/4, -1/4} + # & /@ scaledPrevRot2,
    {-1/4, 1/4} + # & /@ scaledPrev,
    {1/4, 1/4} + # & /@ scaledPrev,
    {1/4, -1/4} + # & /@ scaledPrevRot1]
   ]
 )


Licensing[edit]

I, the copyright holder of this work, hereby publish it under the following license:
w:en:Creative Commons
attribution share alike
This file is licensed under the Creative Commons Attribution-Share Alike 3.0 Unported license.
You are free:
  • to share – to copy, distribute and transmit the work
  • to remix – to adapt the work
Under the following conditions:
  • attribution – You must attribute the work in the manner specified by the author or licensor (but not in any way that suggests that they endorse you or your use of the work).
  • share alike – If you alter, transform, or build upon this work, you may distribute the resulting work only under the same or similar license to this one.

File history

Click on a date/time to view the file as it appeared at that time.

Date/TimeThumbnailDimensionsUserComment
current02:06, 24 July 201351 s, 360 × 360 (694 KB)CalmWords (talk | contribs)User created page with UploadWizard
  • You cannot overwrite this file.

There are no pages that link to this file.

File usage on other wikis

The following other wikis use this file:

Transcode status

Update transcode status
StatusTranscode derivative descriptionDownload derivative
Completed transcode 02:31, 22 February 2014Low bandwidth Ogg video (160P)
Completed transcode 02:09, 22 February 2014Web streamable Ogg video (360P)
Completed transcode 02:07, 24 July 2013Web streamable WebM (360P)
Completed transcode 02:07, 24 July 2013Web streamable Ogg video (480P)