Skip to content
Merged
Show file tree
Hide file tree
Changes from all commits
Commits
File filter

Filter by extension

Filter by extension

Conversations
Failed to load comments.
Loading
Jump to
Jump to file
Failed to load files.
Loading
Diff view
Diff view
20 changes: 10 additions & 10 deletions NAMESPACE
Original file line number Diff line number Diff line change
Expand Up @@ -3,6 +3,7 @@
S3method("!",integer64)
S3method("!=",integer64)
S3method("%%",integer64)
S3method("%*%",integer64)
S3method("%/%",integer64)
S3method("%in%",default)
S3method("%in%",integer64)
Expand All @@ -29,12 +30,20 @@ S3method(abs,integer64)
S3method(all,integer64)
S3method(all.equal,integer64)
S3method(any,integer64)
S3method(anyNA,integer64)
S3method(aperm,integer64)
S3method(array,default)
S3method(array,integer64)
S3method(as.Date,integer64)
S3method(as.POSIXct,integer64)
S3method(as.POSIXlt,integer64)
S3method(as.bitstring,integer64)
S3method(as.character,integer64)
S3method(as.complex,integer64)
S3method(as.data.frame,integer64)
S3method(as.double,integer64)
S3method(as.matrix,integer64)
S3method(as.numeric,integer64)
S3method(as.integer,integer64)
S3method(as.integer64,"NULL")
S3method(as.integer64,Date)
Expand All @@ -52,16 +61,7 @@ S3method(as.integer64,logical)
S3method(as.integer64,raw)
S3method(as.list,integer64)
S3method(as.logical,integer64)
S3method(base::`%*%`,integer64)
S3method(base::anyNA,integer64)
S3method(base::aperm,integer64)
S3method(base::as.Date,integer64)
S3method(base::as.POSIXct,integer64)
S3method(base::as.POSIXlt,integer64)
S3method(base::as.complex,integer64)
S3method(base::as.matrix,integer64)
S3method(base::as.numeric,integer64)
S3method(base::as.raw,integer64)
S3method(as.raw,integer64)
S3method(c,integer64)
S3method(cbind,integer64)
S3method(ceiling,integer64)
Expand Down
14 changes: 7 additions & 7 deletions R/integer64.R
Original file line number Diff line number Diff line change
Expand Up @@ -735,11 +735,11 @@ as.double.integer64 = function(x, ...)
.as_double_integer64(x, keep.attributes=FALSE, ...)

#' @rdname as.character.integer64
#' @exportS3Method base::as.numeric integer64
#' @exportS3Method as.numeric integer64
as.numeric.integer64 = as.double.integer64

#' @rdname as.character.integer64
#' @exportS3Method base::as.complex integer64
#' @exportS3Method as.complex integer64
as.complex.integer64 = function(x, ...) as.complex(as.double(x), ...)

#' @rdname as.character.integer64
Expand All @@ -748,7 +748,7 @@ as.integer.integer64 = function(x, ...)
.Call(C_as_integer_integer64, x, integer(length(x)))

#' @rdname as.character.integer64
#' @exportS3Method base::as.raw integer64
#' @exportS3Method as.raw integer64
as.raw.integer64 = function(x, ...) {
withCallingHandlers(
as.raw(.Call(C_as_integer_integer64, x, integer(length(x)))),
Expand Down Expand Up @@ -778,17 +778,17 @@ as.bitstring.integer64 = function(x, ...) {
}

#' @rdname as.character.integer64
#' @exportS3Method base::as.Date integer64
#' @exportS3Method as.Date integer64
as.Date.integer64 = function(x, origin, ...)
as.Date(as.double(x), origin=origin, ...)

#' @rdname as.character.integer64
#' @exportS3Method base::as.POSIXct integer64
#' @exportS3Method as.POSIXct integer64
as.POSIXct.integer64 = function(x, tz="", origin, ...)
as.POSIXct(as.double(x), tz=tz, origin=origin, ...)

#' @rdname as.character.integer64
#' @exportS3Method base::as.POSIXlt integer64
#' @exportS3Method as.POSIXlt integer64
as.POSIXlt.integer64 = function(x, tz="", origin, ...)
as.POSIXlt(as.double(x, ...), tz=tz, origin=origin, ...)

Expand Down Expand Up @@ -1908,7 +1908,7 @@ as.list.integer64 = function(x, ...) {
}


#' @exportS3Method base::anyNA integer64
#' @exportS3Method anyNA integer64
anyNA.integer64 = function(x, recursive) {
.Call(C_r_ram_integer64_any_na, x=x)
}
6 changes: 3 additions & 3 deletions R/matrix64.R
Original file line number Diff line number Diff line change
Expand Up @@ -84,14 +84,14 @@ rowSums.integer64 = function(x, na.rm=FALSE, dims=1L) {

#' @rdname matrix64
#' @param a,perm Passed on to [aperm()].
#' @exportS3Method base::aperm integer64
#' @exportS3Method aperm integer64
aperm.integer64 = function(a, perm, ...) {
ret = NextMethod()
class(ret) = class(a)
ret
}

#' @exportS3Method base::`%*%` integer64
#' @exportS3Method `%*%` integer64
`%*%.integer64` = function(x, y) {
if (!is.integer64(x) && !is.integer64(y))
return(x%*%y)
Expand Down Expand Up @@ -144,7 +144,7 @@ aperm.integer64 = function(a, perm, ...) {
ret
}

#' @exportS3Method base::as.matrix integer64
#' @exportS3Method as.matrix integer64
as.matrix.integer64 = function(x, ...) {
if (is.matrix(x)) {
x
Expand Down