1. Not finding help here? Sign up for a free 30min tutor trial with Chegg Tutors
    Dismiss Notice
Dismiss Notice
Join Physics Forums Today!
The friendliest, high quality science and math community on the planet! Everyone who loves science is here!

Mathematica 5.0 problem

  1. Mar 28, 2005 #1

    Pengwuino

    User Avatar
    Gold Member

    Ok i type in all this stuff

    << Graphics`ImplicitPlot`
    f[x_, y_] = 5 - 10 x*y - 4 x\^2 + 3 y - y\^4
    fx[x_, y_] = D[f[x, y], x]
    fy[x_, y_] = D[f[x, y], y]
    p1 = ImplicitPlot[fx[x, y] == 0, {x, -4, 4}, {y, -4, 4}, PlotStyle -> RGBColor[1, 0, 0], PlotPoints -> 100]
    p2 = ImplicitPlot[fy[x, y] == 0, {x, -4, 4}, {y, -4, 4}, PlotStyle -> RGBColor[0, 0, 1]]
    Show[p1, p2]


    And when i run it... i get a whole lot of trash. Hundreds of lines of just numbers. What i think the problem might be is that i used Mathematica 4.# at my university and emailed it to myself where i have 5.0. Does anyone know why i got all this garbage and the 2 graphs instead of just hte graphs?
     
  2. jcsd
  3. Mar 30, 2005 #2

    saltydog

    User Avatar
    Science Advisor
    Homework Helper

    This is how I wrote it:

    <<Graphics`ImplicitPlot`

    f1=[itex]5-10xy-4x^2+3y-y^4[/itex];
    f1x=D[f1,x];
    f1y=D[f1,y];

    plt1=ImplicitPlot[f1==0,{x,-4,4},{y,-4,4},PlotStyle->RGBColor[1,0,1]];
    plt2=ImplicitPlot[f1x==0,{x,-4,4},{y,-4,4},PlotStyle->RGBColor[0,1,0]];
    plt3=ImplicitPlot[f1y==0,{x,-4,4},{y,-4,4},PlotStyle->RGBColor[0,0,1]];

    Show[{plt1,plt2,plt3}];
     
Know someone interested in this topic? Share this thread via Reddit, Google+, Twitter, or Facebook

Have something to add?



Similar Discussions: Mathematica 5.0 problem
  1. Mathematica 5.0 (Replies: 1)

  2. Mathematica 5.0 (Replies: 1)

  3. Mathematica problem (Replies: 4)

  4. Mathematica problem (Replies: 2)

Loading...