Conversion d'un tableau en une formule dans R

Question

J'ai un tableau avec des dates comme indices que je trace. Je voudrais tracer une courbe LOESS avec elle. Cependant, l'entrée pour loess est une formule. Y at-il un bon moyen de définir une formule de l'index de tableau à la valeur que je peux ensuite donner à la fonction loess?

Answer 1

Consultez la page d'aide pour loess() - il a quelques exemples de spécification de la formule. Fondamentalement, vous devez mettre vos données dans un objet data.frame avec des variables ayant des noms appropriés, puis la formule sera y ~ x, où x et y sont les noms des variables que vous voulez sur les axes x et y, respectivement.

Je préfère la fonction lowess(), qui est une alternative plus rapide et plus simple. Il a moins de paramètres réglables que loess() mais il est tout aussi bon dans de nombreuses applications. Voici somelinksdescribing les différences entre les deux fonctions.

est Ci-dessous un exemple simple pour les loess() et lowess()

## create an example data set                                 
x <- sort(rpois(100,10) + rnorm(100,0,2)) 
y <- x^2 + rnorm(100,0,7) 
df <- data.frame(x = x,y = y) 
plot(x,y) 
## fit a lowess and plot it                                 
l.fit1 <- lowess(x,y,f = 0.3) 
lines(l.fit1, col = 2,lwd = 2) 

## fit a loess and plot it                                 
l.fit2 <- loess(y ~ x, data = df) 
lines(x,predict(l.fit2,x), col = 3,lwd = 2) 

Answer 2

Il y a plusieurs façons de faire ce que vous voulez; le plus simple pourrait être d'utiliser 'scatter.smooth' qui rassemble plus ou moins tout ce dont vous avez besoin (tracé de données, loess fit, et tracé de courbe) dans un seul appel fonctionnel.

data(AirPassengers)    # a monthly time series supplied w/ base R install 
scatter.smooth(x=1:length(AP), 
       y = as.vector(AP), 
       pch=20,   # this line and lines below are just aesthetics 
       col="orange", 
       lty="dotted", 
       lwd=1.5, 
       xlab="")