To make the 3D plots in Wolfram Alpha, first you need to create a free notebook with the Wolfram Cloud just like we did before. Starting here, click on the Wolfram Programming Lab for beginners. If you scroll down to the very bottom of the page, there is a link in blue on the left that says “Create a new notebook”. Click on this link, and it will open a new tab.
Note that if you end up with an error that say “too much memory required” you may need to create a free account with Wolfram Alpha. You can do this by clicking the “sign in” red button in the top right corner and then click on the “don't have a wolfram ID” button. After you sign in, again click on the “create a new notebook” button to get started.
This is where we will enter in the code that we want. At the top of the notebook, you will see a faint grey line (this is kind of like a cursor).
To make the 3D plot, copy and paste the following code:
ContourPlot3D[V == 5/((x - 2)^2 + y^2)^(1/2) - 5/((x - 8)^2 + y^2)^(1/2), {x, 0, 10}, {y, -5, 5}, {V, -10, 10}]
Then press “Shift” and “Enter” together to have the computer evaluate the code (it may take a few seconds and you may get some warnings, but the code will work). You should be able to rotate the 3D graph now to look at different angles.
Try to answer the following questions, based on what you read in the notes and the 3D plot:
In the next line (click below the graph or push the down button until the faint grey line appears again), copy and paste the following code to make the 2D equipotential lines:
ContourPlot[5/((x - 2)^2 + y^2)^(1/2) - 5/((x - 8)^2 + y^2)^(1/2), {x, 0, 10}, {y, -5, 5}, Contours → 15, ContourShading → None, ContourLabels → True]
Then press “Shift” and “Enter” together to have the computer evaluate the code (you may get some warnings, but the code will work). You should be able to see the equipotential lines (that look like a topographical map).
Try to answer the following questions, based on what you read in the notes and the 3D plot: