On 2017-01-09 8:19 AM, Spencer Graves wrote:
Hi, Peter et al.:
On 2017-01-09 4:24 AM, peter dalgaard wrote:
On 09 Jan 2017, at 10:53 , Spencer Graves
wrote:
# Define an object of class 'dum'
k <- 1
class(k) <- 'dum'
str(k) # as expected
# Define print.dum
Hi, Peter et al.:
On 2017-01-09 4:24 AM, peter dalgaard wrote:
On 09 Jan 2017, at 10:53 , Spencer Graves wrote:
# Define an object of class 'dum'
k <- 1
class(k) <- 'dum'
str(k) # as expected
# Define print.dum
print.dum <- function(x, ...)
On 09 Jan 2017, at 10:53 , Spencer Graves wrote:
> # Define an object of class 'dum'
> k <- 1
> class(k) <- 'dum'
> str(k) # as expected
>
> # Define print.dum
> print.dum <- function(x, ...)
> deparse(substitute(x))
>
> print(k) # Prints "k" as expected
>
Hi, All:
I'm having trouble getting deparse(substitute(x)) inside
print.generic to consistently
I'm having trouble getting a print.something to work
consistently. Consider the following toy example:
# Define an object of class 'dum'
k <- 1
class(k) <- 'dum'
str(k) # as