Archivo:Closest_pair_of_points.svg
De Wikipedia, la enciclopedia encyclopedia
Tamaño de esta previsualización PNG del archivo SVG: 256 × 256 píxeles. Otras resoluciones: 240 × 240 píxeles · 480 × 480 píxeles · 768 × 768 píxeles · 1024 × 1024 píxeles · 2048 × 2048 píxeles.
Ver la imagen en su resolución original ((Imagen SVG, nominalmente 256 × 256 pixels, tamaño de archivo: 1 kB))
Este es un archivo de Wikimedia Commons, un depósito de contenido libre hospedado por la Fundación Wikimedia. Más abajo se reproduce su página de descripción con la información sobre su origen y licencia. |
Resumen
DescripciónClosest pair of points.svg |
English: Closest pair of points shown in red. |
Fecha | |
Fuente | Trabajo propio |
Autor | Qef |
Otras versiones | Bitmap version: file:ClosestPair.png |
Licencia
Este archivo está disponible bajo la licencia Creative Commons Dedicación de Dominio Público CC0 1.0 Universal. | |
La persona que ha asociado una obra a este documento lo dedica al dominio público mediante la cesión mundial de sus derechos bajo la ley de derechos de autor y todos los derechos legales adyacentes propios de dicha, en el ámbito permitido por ley. Puedes copiar, modificar, distribuir y reproducir el trabajo, incluso con objetivos comerciales, sin pedir aprobación del autor.
http://creativecommons.org/publicdomain/zero/1.0/deed.enCC0Creative Commons Zero, Public Domain Dedicationfalsefalse |
Source code
The SVG was generated by running the Lua program given below. It deliberately fails if the closest points would be overlapping in the image, because that would be confusing.
local WD, HT, NUM_POINTS = 256, 256, 16 local COLOR = { normal = '#000', closest = '#f00' } local RADIUS = 5 math.randomseed(os.time()) local P = {} for _ = 1, NUM_POINTS do P[#P+1] = { x = RADIUS + (WD - 2*RADIUS) * math.random(), y = RADIUS + (HT - 2*RADIUS) * math.random() } end -- Find closest pair, using naive algorithm. local closest_a, closest_b local min_dist for i, p in ipairs(P) do for j, q in ipairs(P) do if i ~= j then local dist = math.sqrt((p.x - q.x)^2 + (p.y - q.y)^2) if not min_dist or dist < min_dist then min_dist = dist closest_a, closest_b = i, j end end end end if min_dist < RADIUS then error("points on top of each other, run me again") end io.write('<?xml version="1.0" encoding="UTF-8" standalone="no"?>\n', '<svg svg="http://www.w3.org/2000/svg" version="1.0"', ' width="', WD, '" height="', HT, '">\n') for i, p in ipairs(P) do local color = COLOR.normal if i == closest_a or i == closest_b then color = COLOR.closest end io.write(' <circle cx="', RADIUS + p.x, '" cy="', RADIUS + p.y, '" r="', RADIUS, '" style="fill:', color, '"/>\n') end io.write('</svg>\n')
Elementos representados en este archivo
representa a
Algún valor sin elemento de Wikidata
22 jun 2009
image/svg+xml
120742ed70c3028e512f55d9b9e19453b4a7df2f
1365 byte
256 píxel
256 píxel
Historial del archivo
Haz clic sobre una fecha y hora para ver el archivo tal como apareció en ese momento.
Fecha y hora | Miniatura | Dimensiones | Usuario | Comentario | |
---|---|---|---|---|---|
actual | 04:03 22 jun 2009 | 256 × 256 (1 kB) | Qef | {{Information |Description={{en|1=Closest pair of points shown in red.}} |Source=Own work by uploader |Author=Qef |Date=2009-06-22 |Permission= |other_versions=Bitmap version: file:ClosestPair.png }} <!--{{ImageUpload|full}}--> [[Catego |
Usos del archivo
Las siguientes páginas usan este archivo:
Uso global del archivo
Las wikis siguientes utilizan este archivo:
- Uso en ar.wikipedia.org
- Uso en de.wikipedia.org
- Uso en de.wikiversity.org
- Uso en en.wikipedia.org
- Uso en fa.wikipedia.org
- Uso en fr.wikipedia.org
- Uso en ko.wikipedia.org
- Uso en nl.wikipedia.org
- Uso en ru.wikipedia.org
- Uso en sr.wikipedia.org
- Uso en uk.wikipedia.org