... without answering my previous question, I have just found a fortune-hate workaround, getIcon <- function(geom){ st <- paste("Geom", firstUpper(geom),"$icon", sep="") eval(parse(text=st)) } getIcon("abline") I'm still curious about the get() behaviour though. Best, baptiste