epelpad

El post que buscas se encuentra eliminado, pero este también te puede interesar

Te quiero matemáticamente

Este post va dirigido a todos los que quieran usar las matemáticas de forma romántica para ligar (algo muy geek).

Porque no hay mejor manera de declararle el amor a alguien, que regalándole un corazón, pero como somos matemáticos que hay mejor que un corazón, pues las funciones matemáticas que generan corazones.

Y es que la mejor manera de decir te quiero matemáticamente es:

f (x) = sqrt (1 - (|x| - 1)2)
g (x) = arcos (1 - |x|) - PI

Te quiero matemáticamente



(Aclaración: f(x) es la función de los valores positivos del eje Y y g(x) es la función de los valores negativos del eje Y)

Queda bonito…pero se puede mejorar. ¿Qué mejor que un corazón rojo? Y mejor con un trazo más ancho…y si se pudieran quitar los ejes sería perfecto. Ahí va:

Plot[{f[x],g[x]},{x,-2,2},AspectRatio->Automatic,PlotStyle-> {{RGBColor[1,0,0],Thickness[0.05]},{RGBColor[1,0,0],Thickness[0.05]}},Axes->False]

Cuyo resultado es el siguiente:

matemáticas


Cambiando los valores de la opción Thickness podemos variar la anchura del trazo.

Pero podríamos pedir más cosas. Cualquiera puede dibujar un corazón más o menos bien hecho y colorearlo entero de rojo (o de cualquier otro color). ¿Podemos nosotros? Pues claro que sí:

< < Graphics`FilledPlot` (para introducirlo en Mathematica quitad los espacios)
FilledPlot[{f[x],g[x]},{x,-2,2},Fills->{{{1, 2},RGBColor[1,0,0]}},Curves->None,AspectRatio->Automatic,Axes->False]

El resultado gráfico es el siguiente:

corazón


Amor en 3-D

Hemos dicho que todo el mundo puede dibujar un corazón en dos dimensiones más o menos decente y colorearlo de rojo, aunque hemos visto que con Mathematica el dibujo puede quedarnos mucho mejor. ¿Y si queremos dibujarlo en tres dimensiones? Parece más complicado. De hecho posiblemente a mucha gente le costaría mucho que su dibujo quedara mínimamente decente. Con Mathematica también podemos demostrar nuestro amor en 3-D. Además os voy a dar dos formas:

* Vamos a representar la superficie cuya ecuación implícita es:
ecuaciones


Cargamos el paquete ContourPlot3D:

< < Graphics`ContourPlot3D` (quitadle los espacios)

Y dibujamos el corazón:

ContourPlot3D[(x^2+9/4 y^2+z^2-1)^3-x^2 z^3-9/80 y^2 z^3,{x,-3,3},{y,-3,3}, {z,-3,3},MaxRecursion->3,ViewPoint->{2.032,2.290,1.294},Axes->True,AxesLabel->{"Eje X", "Eje Y","Eje Z"}]

Obtenemos lo siguiente:

hacer


Sí, ya lo sé, en rojo queda mucho mejor. Y sin ejes. Y si la caja. Vamos a ello:

ContourPlot3D[(x^2+9/4 y^2+z^2-1)^3-x^2 z^3-9/80 y^2 z^3,{x,-3,3},{y,-3,3},{z,-3,3},MaxRecursion->3,ViewPoint->{1,2.5,1}, Axes->False,LightSources->{{{0,0,1},RGBColor[1,0,0]}},Boxed->False]

Aquí lo tenemos:

corazones


La segunda opción es representar la superficie cuya ecuación implícita es:

TE QUIERO

En este caso vamos a darlo directamente en rojo, sin ejes y sin caja. Para ello debemos tener ya cargado el paquete ContourPlot3D y ejecutar la siguiente orden en Mathematica:

ContourPlot3D[(2 x^2+y^2+z^2-1)^3-1/10 x^2 z^3-y^2 z^3,{x,-3,3},{y,-3,3},{z,-3,3},MaxRecursion->3,ViewPoint->{2.5,1,1}, Axes->False,LightSources->{{{0,0,1},RGBColor[1,0,0]}},Boxed->False]

Obteniendo así el corazón buscado:

románticas


Conclusión

Como podéis ver hemos conseguido nuestro objetivo: hemos conseguido que las matemáticas nos ayuden a demostrar nuestro amor a alguien. Por tanto podemos decir que hay funciones y ecuaciones que representar el amor, que lo llevan dentro, y que nos sirven para que mostremos el nuestro por alguien.


Cortito y al pie

¿A quién quiere uno más, a su madre o a su novia?


Es cuestión de matemáticas, dentro de mi madre he estado nueve meses, y dentro de mi novia voy a estar como mucho quince días


Fuente

Matemáticas románticas

28 comentarios - Te quiero matemáticamente

ropedee +4
claro, entendi todo (?)
yondaime29
Comentarios
No hay comentarios...
gap
esta bueno
DeleteAll
lindo...pero odio las matematicas...por lo tanto amaria con odio? jajaj...esta bueno che!
Juno
mu curioso, te dejo unos puntejos
meteorly
ya me bajo el contourplot3d

por ahora lo demuestro en 2d


excelente +2
kawa12
excelente loco,
elzorrosensei
mejor le compro una targeta y listo menos problemas jjajaja
Gontattoo
muy muy bueno, las matematicas son lindas cuando las entendés, si no las entendés, las odias...
nicolas34704900
ESTA HABLANDO DEL FASO!!!!
JAJAJAJAJJA alguien lo tenia que decir
Dario023 -1
ajajajjaja el que hizo esto es un freaky mall... no puede estar tan al pedo... aunque... yo te lo digo de la otra forma matematica...

- mayor 3

o de otra forma que te vas a dar mas cuenta

&lt;3


jajkajajaja no puteen... (mucho) es otra forma...

tambien esta la cibernetikk...

yo t (LL

la flogger

tipo como q te re super archi mega quiero gorr... osea sabes no?


la villera


he\' vo\'\' lok\' yo te quiero tanto como al paco a vo\' hee\'

la emo

no te quiero

la poetica

te quiero como la mierda, no te olvido ni cagando, cada pedo que me tiro, es un beso que te mando... (jajajaja)

la normal

TE QUIERO



Dario023
me olvide...


Te quiero matemáticamente


NO PODIA FALTAR... =D
lucroar
yo cuando estoy d novio siento q qiero a mi novia mas q a nada, pero despues te das cuenta q no va a estar para siempre, en cambio la mami si
Jhonyshow +4
T_T me salio estomatemáticascorazón[/URL]]