Tag Info

Hot answers tagged

4

Looks fine to me, once you get your aspect ratio proper. foci = {{-3, 25}, {2, 20}}; ContourPlot[ Total[EuclideanDistance[#, {x, y}] & /@ foci], {x, -5, 5}, {y, 10, 30}, AspectRatio -> 2, Epilog -> {Black, PointSize[Large], Point@foci}] or your horizontal and vertical ranges equal: foci = {{-3, 25}, {2, 20}}; mycontplot = ContourPlot[ ...


1

plots = DateListPlot[CountryData[#, {"Population", {1800, 2020}}], PlotLabel -> "population of " <> #, ImageSize -> 250] & /@ {"Poland", "Austria", "Switzerland", "Germany"}; GraphicsGrid[{{plots[[1]], plots[[2]]}, {plots[[3]], plots[[4]]}}, ImageSize -> 500] sol = Solve[{2 x + 3 y == 5, 3 x + 4 y == 11}]; xyVals = ...



Only top voted, non community-wiki answers of a minimum length are eligible