File:Closest pair of points.svg
De Wikimedia Commons, el repositorio multimedia libre
Ir a la navegación
Ir a la búsqueda
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.
Archivo original (archivo SVG, nominalmente 256 × 256 píxeles, tamaño de archivo: 1 kB)
Información del archivo
Datos estructurados
Leyendas
Resumen
[editar]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
[editar]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
[editar]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')
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 (discusión | contribs.) | {{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 |
No puedes sobrescribir este archivo.
Usos del archivo
La siguiente página usa 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 es.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