Erreur dans la fonction eval(expr, envir, enclos) - contradiction?

Édité afin de donner davantage de exemple de code et la question spécifique

Je suis en train d'écrire une fonction pour produire des séries chronologiques des parcelles de prix des actions. Cependant, j'obtiens l'erreur suivante

Erreur dans la fonction eval(expr, envir, enclos) : l'objet "df1234' ne trouve pas

Voici un exemple de la fonction:

plot.prices <- function(df1234) {
  require(ggplot2)
  g <- ggplot(df1234, aes(x= as.Date(Date, format= "%Y-%m-%d"), y= df1234[, 3], 
              colour= brewer.pal(12,"Set3")[1])) + geom_point(size=1)
  g + geom_point(aes(x= date, y = df1234[, 4], 
                 colour= brewer.pal(12,"Set3")[2]), size=1)

  # ... code not shown...
  g
}

Et de données, par exemple:

spy <- read.csv(file= 'http://ichart.finance.yahoo.com/table.csv?s=SPY&d=11&e=1&f=2012&g=d&a=0&b=29&c=1993&ignore=.csv', header= T)

plot.prices(spy) # produces error
g <- ggplot(spy, aes(x= as.Date(Date, format= "%Y-%m-%d"), y= spy[, 3], 
              colour= brewer.pal(12,"Set3")[1])) + geom_point(size=1)
  g + geom_point(aes(x= as.Date(Date), y = spy[, 4], 
                 colour= brewer.pal(12,"Set3")[2]), size=1)
## does not produce error

Comme vous pouvez le voir, le code est identique. J'obtiens une erreur si l'appel à ggplot() est à l'INTÉRIEUR de la fonction, mais pas si l'appel à ggplot() est en DEHORS de la fonction.

Quelqu'un a une idée de pourquoi l'apparente contradiction?

Vous pourriez être intéressé par quantmod

OriginalL'auteur Alex W | 2012-12-01

  1. 1

    Je ne sais pas si c'est ce que vous voulez, mais ça pourrait aider. J'ai modifié agstudy code:

    spy <- read.csv(file= 'http://ichart.finance.yahoo.com/table.csv?s=SPY&d=11&e=1&f=2012&g=d&a=0&b=29&c=1993&ignore=.csv', header= T)

library(ggplot2)
library(RColorBrewer)

 plot.prices <- function(df) {

   df$Date <- as.Date(df$Date, format= "%Y-%m-%d")

   g <- ggplot(df, aes_string(x='Date', y= colnames(df)[3])) + 
                   geom_point(colour= brewer.pal(12,"Set3")[1], size=1)

   gg <- g + geom_point(aes_string(x='Date', y= colnames(df)[4]),
                   colour= brewer.pal(12,"Set3")[2], size=1)
   gg
 }

 plot.prices(spy)

    Voici le code sans l'aide de brewer.pal:

    library(ggplot2)

spy <- read.csv(file= 'http://ichart.finance.yahoo.com/table.csv?s=SPY&d=11&e=1&f=2012&g=d&a=0&b=29&c=1993&ignore=.csv', header= T)

 plot.prices <- function(df) {

   df$Date <- as.Date(df$Date, format= "%Y-%m-%d")

   g <- ggplot(df, aes_string(x='Date', y= colnames(df)[3])) + 
                   geom_point(colour= 'green', fill='green', size=1)

   gg <- g + geom_point(aes_string(x='Date', y= colnames(df)[4]),
                   colour= 'black', fill='black', size=1)
   gg
 }

 plot.prices(spy)
    Regarde comme j'avais une erreur de syntaxe. J'ai été en utilisant "... aes_string(x,y, couleur)" pas "... aes_string(x,y ), de couleur)"

    OriginalL'auteur Mark Miller

  2. 10

    L'erreur se produire parce que vous utilisez df[, 7] en gglpot2, utilisez la colonne nom Adj Fermer résoudre le problème.

     g <- ggplot(df, aes(x= as.Date(Date, format= "%Y-%m-%d"),
                  y= Adj.Close)) + geom_point(size=1)

    En fait l'erreur , c'est une erreur de délimitation de l'étendue. aes ne pouvez pas trouver le df de l'environnement. Il essaie de chercher la portée globale .

    si vous vous voulez utiliser l'indexation des appels , vous pouvez utiliser aes_string par exemple , et de manipuler des chaînes de caractères non des expressions

    plot.prices <- function(df) {
  require(ggplot2)

  df$Date <- as.Date(df$Date, format= "%Y-%m-%d")

  g <- ggplot(df, aes_string(x= 'Date',
                      y= colnames(df)[7])) + geom_point(size=1)

  # ... code not shown...
  g
}

    Erreur dans la fonction eval(expr, envir, enclos) - contradiction?

    Ce serait résoudre le problème dans l'exemple de la fonction. Toutefois, le code complet comprend l'ajout de couches pour plusieurs colonnes.... Je n'ai pas mis le détail parce que ce serait rendre les données d'exemple difficile. <\n> Bas de Ligne j'ai besoin d'être en mesure d'utiliser l'indexation des appels pour l'aes(y= ...).
    J'y ai ajouté ma solution pour l'indexation
    J'ai édité mon problème de donner davantage de exemple de l'erreur. Peut-être le problème, c'est l'ajout de la couleur= brasseur.pal(...)
    Où avez-vous brewer.pal? Est-il dans le " RColorBrewer d'un paquet?
    avant d'essayer de faire parcelles complexes avec ggplot2 essayer de comprendre les principes de base : l'esthétique de la cartographie et de la portée lexicale.

    OriginalL'auteur agstudy