{"id":59,"date":"2008-02-14T01:11:24","date_gmt":"2008-02-14T00:11:24","guid":{"rendered":"http:\/\/www.walkingrandomly.com\/?p=59"},"modified":"2010-01-31T20:09:45","modified_gmt":"2010-01-31T19:09:45","slug":"the-valentines-equations","status":"publish","type":"post","link":"https:\/\/walkingrandomly.com\/?p=59","title":{"rendered":"The Valentine&#8217;s Equations"},"content":{"rendered":"<p>A couple of weeks ago I started thinking about Valentine&#8217;s day and, since I like equations that have <a href=\"https:\/\/www.walkingrandomly.com\/?p=64\">interesting plots<\/a> so much, I wondered if I could find one that had a heart-shaped graph.  A quick google search came up Wolfram Research&#8217;s <a href=\"http:\/\/mathworld.wolfram.com\/HeartSurface.html\">Heart Surface<\/a> page.<\/p>\n<p>The main page described a couple of heart shaped <a href=\"http:\/\/mathworld.wolfram.com\/AlgebraicSurface.html\">algebraic surfaces<\/a> which looked nice but there were a few more on the Mathematica notebook that the page linked to.  This notebook was rather old and included plots from old versions of Mathematica so on the train ride home I wrapped these equations in some Manipulate functions and sent the resulting demo to Wolfram.  The result was <a href=\"http:\/\/demonstrations.wolfram.com\/EquationsForValentines\/\">published today on the Wolfram Demonstrations site<\/a>.<\/p>\n<p style=\"text-align: center\"><img loading=\"lazy\" decoding=\"async\" src=\"\/images\/mathematica\/heart_demo.jpg\" title=\"heart demo\" alt=\"heart demo\" height=\"555\" width=\"444\" \/><\/p>\n<p>Essentially all this demo does is use Mathematica&#8217;s ContourPlot3D function to plot the curves formed from the following equations and allow you to play with the results a bit.<\/p>\n<p>Nordstrand<br \/>\n<img loading=\"lazy\" decoding=\"async\" src=\"https:\/\/walkingrandomly.com\/wp-content\/ql-cache\/quicklatex.com-f4894d250a640369e70088d0d3b11b5e_l3.png\" class=\"ql-img-inline-formula quicklatex-auto-format\" alt=\"&#32;&#92;&#108;&#105;&#103;&#104;&#116;&#32;&#45;&#92;&#102;&#114;&#97;&#99;&#123;&#56;&#125;&#123;&#52;&#53;&#125;&#32;&#120;&#94;&#50;&#32;&#122;&#94;&#51;&#45;&#121;&#94;&#50;&#32;&#122;&#94;&#51;&#43;&#92;&#108;&#101;&#102;&#116;&#40;&#92;&#102;&#114;&#97;&#99;&#123;&#51;&#50;&#32;&#120;&#94;&#50;&#125;&#123;&#57;&#125;&#43;&#50; &#121;&#94;&#50;&#43;&#122;&#94;&#50;&#45;&#49;&#92;&#114;&#105;&#103;&#104;&#116;&#41;&#94;&#51;&#32;&#61;&#32;&#48;\" title=\"Rendered by QuickLaTeX.com\" height=\"36\" width=\"352\" style=\"vertical-align: -12px;\"\/><\/p>\n<p>Kuska<\/p>\n<p><img loading=\"lazy\" decoding=\"async\" src=\"https:\/\/walkingrandomly.com\/wp-content\/ql-cache\/quicklatex.com-149c0d2002f0326b3e2497cf0527fa13_l3.png\" class=\"ql-img-inline-formula quicklatex-auto-format\" alt=\"&#32;&#92;&#108;&#105;&#103;&#104;&#116;&#32;&#45;&#92;&#102;&#114;&#97;&#99;&#123;&#49;&#125;&#123;&#49;&#48;&#125;&#32;&#120;&#94;&#50;&#32;&#122;&#94;&#51;&#45;&#121;&#94;&#50;&#32;&#122;&#94;&#51;&#43;&#92;&#108;&#101;&#102;&#116;&#40;&#50;&#32;&#120;&#94;&#50;&#43;&#121;&#94;&#50;&#43;&#122;&#94;&#50;&#45;&#49;&#92;&#114;&#105;&#103;&#104;&#116;&#41;&#94;&#51;&#61;&#48;\" title=\"Rendered by QuickLaTeX.com\" height=\"26\" width=\"333\" style=\"vertical-align: -7px;\"\/><\/p>\n<p>Taubin<\/p>\n<p><img loading=\"lazy\" decoding=\"async\" src=\"https:\/\/walkingrandomly.com\/wp-content\/ql-cache\/quicklatex.com-7da28c628e5bc46f69ea228cad70677b_l3.png\" class=\"ql-img-inline-formula quicklatex-auto-format\" alt=\"&#32;&#92;&#108;&#105;&#103;&#104;&#116;&#32;&#45;&#120;&#94;&#50;&#32;&#122;&#94;&#51;&#45;&#92;&#102;&#114;&#97;&#99;&#123;&#57;&#32;&#121;&#94;&#50;&#32;&#122;&#94;&#51;&#125;&#123;&#56;&#48;&#125;&#43;&#92;&#108;&#101;&#102;&#116;&#40;&#120;&#94;&#50;&#43;&#92;&#102;&#114;&#97;&#99;&#123;&#57; &#121;&#94;&#50;&#125;&#123;&#52;&#125;&#43;&#122;&#94;&#50;&#45;&#49;&#92;&#114;&#105;&#103;&#104;&#116;&#41;&#94;&#51;&#61;&#48;\" title=\"Rendered by QuickLaTeX.com\" height=\"36\" width=\"324\" style=\"vertical-align: -12px;\"\/><\/p>\n<p>Trott<\/p>\n<p><img loading=\"lazy\" decoding=\"async\" src=\"https:\/\/walkingrandomly.com\/wp-content\/ql-cache\/quicklatex.com-631e034700282ee6c2a130805c335640_l3.png\" class=\"ql-img-inline-formula quicklatex-auto-format\" alt=\"&#32;&#92;&#108;&#105;&#103;&#104;&#116;&#32;&#51;&#50;&#48;&#32;&#92;&#108;&#101;&#102;&#116;&#40;&#45;&#120;&#94;&#50;&#32;&#122;&#94;&#51;&#45;&#92;&#102;&#114;&#97;&#99;&#123;&#57;&#32;&#121;&#94;&#50;&#32;&#122;&#94;&#51;&#125;&#123;&#56;&#48;&#125;&#43;&#92;&#108;&#101;&#102;&#116;&#40;&#120;&#94;&#50;&#43;&#92;&#102;&#114;&#97;&#99;&#123;&#57; &#121;&#94;&#50;&#125;&#123;&#52;&#125;&#43;&#122;&#94;&#50;&#45;&#49;&#92;&#114;&#105;&#103;&#104;&#116;&#41;&#94;&#51;&#92;&#114;&#105;&#103;&#104;&#116;&#41;&#61;&#48;\" title=\"Rendered by QuickLaTeX.com\" height=\"43\" width=\"380\" style=\"vertical-align: -17px;\"\/><\/p>\n<p>Each equation is named after the person who first wrote it down (to my knowledge at least).  It&#8217;s a simple demo but I hope you like it.<\/p>\n<p>Happy Valentine&#8217;s day.<\/p>\n","protected":false},"excerpt":{"rendered":"<p>A couple of weeks ago I started thinking about Valentine&#8217;s day and, since I like equations that have interesting plots so much, I wondered if I could find one that had a heart-shaped graph. A quick google search came up Wolfram Research&#8217;s Heart Surface page. The main page described a couple of heart shaped algebraic [&hellip;]<\/p>\n","protected":false},"author":3,"featured_media":0,"comment_status":"open","ping_status":"open","sticky":false,"template":"","format":"standard","meta":{"jetpack_post_was_ever_published":false,"footnotes":"","jetpack_publicize_message":"","jetpack_publicize_feature_enabled":true,"jetpack_social_post_already_shared":false,"jetpack_social_options":{"image_generator_settings":{"template":"highway","default_image_id":0,"font":"","enabled":false},"version":2}},"categories":[6,8,18],"tags":[],"class_list":["post-59","post","type-post","status-publish","format-standard","hentry","category-general-math","category-mathematica","category-wolfram-demonstrations"],"jetpack_publicize_connections":[],"jetpack_featured_media_url":"","jetpack_shortlink":"https:\/\/wp.me\/p3swhs-X","jetpack_sharing_enabled":true,"_links":{"self":[{"href":"https:\/\/walkingrandomly.com\/index.php?rest_route=\/wp\/v2\/posts\/59","targetHints":{"allow":["GET"]}}],"collection":[{"href":"https:\/\/walkingrandomly.com\/index.php?rest_route=\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/walkingrandomly.com\/index.php?rest_route=\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/walkingrandomly.com\/index.php?rest_route=\/wp\/v2\/users\/3"}],"replies":[{"embeddable":true,"href":"https:\/\/walkingrandomly.com\/index.php?rest_route=%2Fwp%2Fv2%2Fcomments&post=59"}],"version-history":[{"count":2,"href":"https:\/\/walkingrandomly.com\/index.php?rest_route=\/wp\/v2\/posts\/59\/revisions"}],"predecessor-version":[{"id":2261,"href":"https:\/\/walkingrandomly.com\/index.php?rest_route=\/wp\/v2\/posts\/59\/revisions\/2261"}],"wp:attachment":[{"href":"https:\/\/walkingrandomly.com\/index.php?rest_route=%2Fwp%2Fv2%2Fmedia&parent=59"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/walkingrandomly.com\/index.php?rest_route=%2Fwp%2Fv2%2Fcategories&post=59"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/walkingrandomly.com\/index.php?rest_route=%2Fwp%2Fv2%2Ftags&post=59"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}