2012-10-03 4 views
7

プロット:IがRの次の暗黙的な式をプロットしようとしている陰関数

1 = X^2 +楕円形であるべきである+ X * Y

4 *(^ 2 Y)。私は無作為にx値をサンプリングし、それらに基づいてグラフを生成したいと思います。

Here's関連するスレッドですが、解決策は3Dの場合に固有のようです。この質問は、私が期待していたはずのグーグルリングにもっと抵抗しているので、R言語は暗黙の式を何か他のものと呼ぶかもしれません。

ありがとうございます!

+0

@mnel。あなたのバージョンは正しいです。元に戻す! –

答えて

11

理解できないことが2つあります。

0 = -1+ x^2 + 4*(y^2) + x*y 

その後ゼロの輪郭値を使用して意味を行います:その技術と陰関数をプロットすると、あなたの陰関数となるように、機能のRHSへのすべての条項を移動する必要があり

x<-seq(-1.1,1.1,length=1000) 
y<-seq(-1,1,length=1000) 
z<-outer(x,y,function(x,y) 4*y^2+x^2+x*y -1) 
contour(x,y,z,levels=0) 

最初のバージョンで間違ったサインがあります。 @mnelsは正しかった。

enter image description here

+0

ええ、でも、「ランダムにxをサンプリングする」という彼の要求はどうですか?私は彼があなたのメソッドを使いたいのですが、 'x <-runif(1000、-1.1,1.1)'を使い、 'y'を使って楕円上に点を生成するように解いているのだろうかと思います。あるいは 'sfsmisc :: ellipsePoints'はどうでしょうか? –

+0

正直言って私は質問の「ランダムな」x部分に気付かなかった。 「yについて解く」には、二次関数の「両辺」を得る必要があります。 'sfmisc :: ellipsePoints'は私のための即時の(あるいは遅れた)解決策を提供しているようには見えません。私は戻って、aparametersを持つ前に、半軸、中心、および角度の長さを計算し、それからそれを使って任意のx値の解を生成する方法は見当たりません。 –

関連する問題