Ytukyg

I'm newbie in R and I'm trying to pass an object to a function but I've got an error when I try to access to a slot of this object.

These are my main code:

x <- new("menu", competition=0, stats=0, query="")

y <- show(x)

show_graphics(y)

After second instruction I've got the object "y" created correctly like you can see in this screencap:

Then, I call to a the function "show_graphics" and pass this object "y" like a parameter. But when I try to access to an slot in the first insctruction of my function:

show_graphics <- function(menu){

  data <- getData(menu@query)

  ......

}

I've got an error that tell me that there is an error to try to access
to the slot "query" of an object to the basic class "function" without
slots.

How can I pass correctly an object to a function? Or how can I get the values from an object passed to a function?

Am I doing something wrong?

Edit I:

This is the code to create the object "menu":

setClass("menu", slots=list(competition="numeric", stats="numeric", query="character"))

show <- function(object) 0

setGeneric("show")

setMethod("show", "menu", function(object){

  object@competition <- 14

  object@stats <- 1

  object@query <- "query"

  return (object)

})

Edit II:

getData is another function, here is the code of a prototype:

getData <- function(query){

   return (query)

}