6

wolfram-alpha-website で関数をプロットすると、次のようになります。

ここに画像の説明を入力

http://www.wolframalpha.com/link

R で同じ関数をプロットすると、次のようになります。

プロット( 関数(x) x^2 - 3*x - 10 ) ここに画像の説明を入力

Wolfram のデフォルトのプロットは、はるかに理解しやすいものです。これは、x 軸 (y=0) を示し、放物線を中心にしているためだと思います。

関数の式を見て、プロットを中央に配置する必要があるかどうかを確認するだけの数学は得意ではありません。関数をプロットして、さまざまな関数がさまざまな線を作成する方法を学習しているため、この中央揃えを自動的に行う必要があります。そうしないと、プロットを誤解する可能性があるためです。

Wolframプロットを自動的に作成することは可能ですか?つまり、プロットを中央に配置するのが賢明な場所をRに指示する必要はありませんか?

4

3 に答える 3

4

パッケージは、polynom適切なデフォルトをいくつか作成します。

例えば。

library(polynom)

# your polynomial (coefficients in ascending powers of x order)
p <- polynomial(c(-10,-3,1))
plot(p)

ここに画像の説明を入力

 # a more complicated example, a polynomial crossing the x axis at -1,0,1,2,3,4,5

 p2 <- poly.calc(-1:5)
 p2 
 # -120*x + 154*x^2 + 49*x^3 - 140*x^4 + 70*x^5 - 14*x^6 + x^7 
 plot(p2)

ここに画像の説明を入力

于 2013-11-27T22:24:00.847 に答える
2

で説明されているように、プロットする間隔を設定できます?plot.function。curveおよびも参照してくださいabline。

plot( function(x) x^2 - 3*x - 10 , -15, 15) ; abline(h=0,v=0,lty=3)

また

curve(x^2 - 3*x - 10 , -15, 15) ; abline(h=0,v=0,lty=3)
于 2013-11-27T19:50:19.080 に答える
0

これはかなり古い投稿ですが、モデルの係数に基づいて多項式曲線を当てはめようとしていました。

ベース R のオリジナル:

plot( y ~ x) 
curve(3*x - 2*x^2 + 2*x^3)   ##  random coefficients for easy example

私はggplot2を使用しているので、+ geom_smoothではなく、係数から生成された曲線を使用したかった(これも機能しますが、以下の曲線を好みます)

bestfit <- geom_smooth(method = "loess", se = T, size = 1) 

ggplot2 
+ bestfit

代わりに、上記の係数を使用して関数を作成しました

test 
test <- function(x) {3*x - 2*x^2 + 2*x^3}

次に、それをggplotのレイヤーとして追加しました

ggplot2
+ stat_function(fun = test)

ベースプロット関数と同じ曲線が得られますが、すべての追加レイヤーを ggplot に追加できます

于 2015-11-04T10:33:34.313 に答える