On May 10, 2014, at 3:54 AM, Duncan Murdoch wrote:
> On 10/05/2014, 6:46 AM, Barry Rowlingson wrote:
>> On Fri, May 9, 2014 at 10:42 PM, Hadley Wickham wrote:
>>> Beware of the is.* functions:
>>>
>>> * is.object() does not test the usual definition of objects
>>> * is.vector() does not test th
On 10 May 2014, at 12:54 , Duncan Murdoch wrote:
> On 10/05/2014, 6:46 AM, Barry Rowlingson wrote:
>> On Fri, May 9, 2014 at 10:42 PM, Hadley Wickham wrote:
>>> Beware of the is.* functions:
>>>
>>> * is.object() does not test the usual definition of objects
>>> * is.vector() does not test the
On 10/05/2014, 6:46 AM, Barry Rowlingson wrote:
On Fri, May 9, 2014 at 10:42 PM, Hadley Wickham wrote:
Beware of the is.* functions:
* is.object() does not test the usual definition of objects
* is.vector() does not test the usual definition of vectors
* is.numeric() does not work the same way
On Fri, May 9, 2014 at 10:42 PM, Hadley Wickham wrote:
> Beware of the is.* functions:
>
> * is.object() does not test the usual definition of objects
> * is.vector() does not test the usual definition of vectors
> * is.numeric() does not work the same way as is.character() or is.integer()
> * is.
Dear Hadley:
Thanks for that. Digits are not numbers. Numbers are not data.
Data is not information. Information is not intelligence. Intelligence
is not knowledge. Knowledge is not wisdom. And your "is." warnings are
more useful than my trivia here.
Spencer
On 5/9/2014
Beware of the is.* functions:
* is.object() does not test the usual definition of objects
* is.vector() does not test the usual definition of vectors
* is.numeric() does not work the same way as is.character() or is.integer()
* is.Date() doesn't exist
* is.nan() doesn't return TRUE for some NaNs
Hi, Duncan:
Thanks very much. I used to think that everything in R was a
object. Now I know that is.object(quote(x)) is FALSE. (A decade ago,
S-Plus asked me if I wanted to save changes to history. I thought,
"Wow! Do I get to change history?"
Hadley's "Advanced R" book me
Ahhh. Thanks Duncan.
-- Bert
Bert Gunter
Genentech Nonclinical Biostatistics
(650) 467-7374
"Data is not information. Information is not knowledge. And knowledge
is certainly not wisdom."
H. Gilbert Welch
On Fri, May 9, 2014 at 2:41 AM, Duncan Murdoch wrote:
> On 09/05/2014, 2:41 AM, Bert G
On 09/05/2014, 2:41 AM, Bert Gunter wrote:
Spencer:
Hmmm
Well, I don't get what's going on here -- as.character.default is
internal -- but could you method-ize a simple synonym:
See ?InternalMethods:
"For efficiency, internal dispatch only occurs on objects, that is those
for which is.ob
Spencer:
Hmmm
Well, I don't get what's going on here -- as.character.default is
internal -- but could you method-ize a simple synonym:
asChar<- function(e,...)UseMethod("asChar")
asChar.call <- function(e,...)deparse(e,...)
asChar.default <- function(e,...)as.character(e,...)
> asChar(xDy)
[
On 5/8/2014 8:05 PM, Bert Gunter wrote:
[1] "x$y"
Spencer:
Does
deparse(substitute(x$y))
[1] "x$y"
do what you want?
No: The problem is methods dispatch. class(quote(x$y)) =
'call', but as.character(quote(x$y)) does NOT go to "as.character.call".
deparse(quote(x$y)) retur
[1] "x$y"
Spencer:
Does
deparse(substitute(x$y))
[1] "x$y"
do what you want?
Cheers,
Bert
-- Bert
Bert Gunter
Genentech Nonclinical Biostatistics
(650) 467-7374
"Data is not information. Information is not knowledge. And knowledge
is certainly not wisdom."
H. Gilbert Welch
On Thu,
"as.character.call" seems not to work as an alias for deparse.
Consider the following:
xDy <- quote(x$y)
class(xDy)
"call"
as.character.call <- function(x, ...)deparse(x, ...)
as.character(xDy)
[1] "$" "x" "y"
# fails
str(xDy)
# language x$y
as.character.language <- function(x, ...)"langua
Thanks for the quick replies from Richard Heiberger, Greg Show &
Bert Gunter.
Might it make sense to create as.character.call as an alias for
deparse?
A few years ago, I wrote several functions like "predict.fd" as
aliases for functions with less memorable names like "eva
... and
> str(quote(x$y))
language x$y
> as.list(quote(x$y))
[[1]]
`$`
[[2]]
x
[[3]]
y
## may be instructive.
Cheers,
Bert
Bert Gunter
Genentech Nonclinical Biostatistics
(650) 467-7374
"Data is not information. Information is not knowledge. And knowledge
is certainly not wisdom."
H. Gi
> deparse(quote(x$y))
[1] "x$y"
It looks like deparse does what you want here.
On Wed, May 7, 2014 at 3:23 PM, Spencer Graves
wrote:
> Hello, All:
>
>
> Is there a simple utility someplace to convert "quote(x$y)" to "x$y"?
>
>
> I ask, because as.character(quote(x$y)) is a character
> deparse(quote(x$y))
[1] "x$y"
On Wed, May 7, 2014 at 5:23 PM, Spencer Graves
wrote:
> Hello, All:
>
>
> Is there a simple utility someplace to convert "quote(x$y)" to "x$y"?
>
>
> I ask, because as.character(quote(x$y)) is a character vector of
> length 3 = "$" "x" "y". I want to
Hello, All:
Is there a simple utility someplace to convert "quote(x$y)" to
"x$y"?
I ask, because as.character(quote(x$y)) is a character vector of
length 3 = "$" "x" "y". I want to convert this to "x$y" for a
diagnostic message.
class(quote(x$y)) = "call", which sugg
18 matches
Mail list logo