Datei:Polygon spiral.png
Polygon_spiral.png (400 × 350 Pixel, Dateigröße: 17 KB, MIME-Typ: image/png)
Diese Datei und die Informationen unter dem roten Trennstrich werden aus dem zentralen Medienarchiv Wikimedia Commons eingebunden.
File:Polygon spiral.svg ist eine vektorisierte Version dieses Bildes. Diese sollte an Stelle des Rasterbildes verwendet werden, sofern sie nicht schlechter ist.
File:Polygon spiral.png → File:Polygon spiral.svg
Für weitere Informationen siehe Help:SVG.
|
Übertragen aus en.wikipedia nach Commons durch Maksim.
This graphic of an approximate logarithmic spiral made up from polygonal subunits was created using the perl interface to the ImageMagick image manipulation software:
#!/usr/bin/perl use Image::Magick; #the perl interface to the ImageMagic software use Math::Trig; # The points of the polygon. Arbitrary. ($x0,$y0) = (0,0); ($x1,$y1) = (10,0); ($x2,$y2) = (20,5); ($x3,$y3) = (5,15); # length of lower side divided by length of upper side: $factor = sqrt((($x2-$x3)**2 + ($y2-$y3)**2) / (($x1-$x0)**2 + ($y1-$y0)**2)); # angle between upper side and lower side, in radians: $angle = atan(($y2-$y3)/($x2-$x3)) - atan(($y1-$y0)/($x1-$x0)); # Create an empty white image: $image=Image::Magick->new(size=>'400x350'); $image->Read('xc:white'); $polygon_points = "$x0,$y0 $x1,$y1 $x2,$y2 $x3,$y3 $x0,$y0"; # Create two sample polygons $image->Draw(primitive=>'polygon', points=>$polygon_points, stroke=>red, translate=>"30,30"); $image->Draw(primitive=>'polygon', points=>$polygon_points, scale=>"$factor,$factor", stroke=>red, translate=>"70,30"); # Now place 5 of them side by side, appropriately stretched and turned $stretch = 1; $turn = 0; $posX = 120; $posY = 250; for (1..5) { $image->Draw(primitive=>'polygon', points=>$polygon_points, scale=>"$stretch,$stretch", stroke=>red, rotate=>$turn * 180/pi, translate=>"$posX,$posY"); $posX = $posX + $stretch * ( cos($turn) * ($x3-$x0) - sin($turn) * ($y3-$y0)); $posY = $posY + $stretch * ( sin($turn) * ($x3-$x0) + cos($turn) * ($y3-$y0)); $turn = $turn + $angle; $stretch = $stretch * $factor; } # Add some text $image->Set(font=>'-*-helvetica-medium-r-*-*-12-*-*-*-*-*-iso8859-*'); #this only works on the X window system $image->Annotate(text=>"polygonal subunits", x=>30, y=>75, fill=>black); $image->Annotate(text=>"approximate logarithmic spiral", x=>120, y=>310, fill=>black); # Write out the image in the png format $image->Write('polygon_spiral.png');
Es ist erlaubt, die Datei unter den Bedingungen der GNU-Lizenz für freie Dokumentation, Version 1.2 oder einer späteren Version, veröffentlicht von der Free Software Foundation, zu kopieren, zu verbreiten und/oder zu modifizieren; es gibt keine unveränderlichen Abschnitte, keinen vorderen und keinen hinteren Umschlagtext.
Der vollständige Text der Lizenz ist im Kapitel GNU-Lizenz für freie Dokumentation verfügbar.http://www.gnu.org/copyleft/fdl.htmlGFDLGNU Free Documentation Licensetruetrue |
Diese Datei ist unter der Creative-Commons-Lizenz „Namensnennung – Weitergabe unter gleichen Bedingungen 3.0 nicht portiert“ lizenziert. | ||
| ||
Diese Lizenzmarkierung wurde auf Grund der GFDL-Lizenzaktualisierung hinzugefügt.http://creativecommons.org/licenses/by-sa/3.0/CC BY-SA 3.0Creative Commons Attribution-Share Alike 3.0truetrue |
date/time | username | edit summary |
---|---|---|
10:02, 10 December 2004 | en:User:Solitude | (assuming by user, {{GFDL}}) |
12:17, 9 August 2002 | en:User:Brion VIBBER | (<nowiki>...</nowiki>) |
21:30, 8 August 2002 | en:User:Josh Grosse | (Moving from image credits) |
Ursprüngliches Datei-Logbuch
Legend: (cur) = this is the current file, (del) = delete this old version, (rev) = revert to this old version.
Click on date to download the file or see the image uploaded on that date.
- (del) (cur) 11:49, 20 July 2002 . . . . 400x350 (17711 bytes)
In dieser Datei abgebildete Objekte
Motiv
Dateiversionen
Klicke auf einen Zeitpunkt, um diese Version zu laden.
Version vom | Vorschaubild | Maße | Benutzer | Kommentar | |
---|---|---|---|---|---|
aktuell | 20:01, 19. Mär. 2006 | 400 × 350 (17 KB) | Maksim | La bildo estas kopiita de wikipedia:en. La originala priskribo estas: This graphic of an approximate logarithmic spiral made up from polygonal subunits was created using the perl interface to the ImageMagick image ma |
Dateiverwendung
Keine Seiten verwenden diese Datei.
Globale Dateiverwendung
Die nachfolgenden anderen Wikis verwenden diese Datei:
- Verwendung auf en.wikipedia.org
- Verwendung auf simple.wikipedia.org