Displaying 20 results from an estimated 20 matches for "g1c0".
Did you mean:
g10
2019 Jul 23
3
Any plans for ALTREP lists (VECSXP)?
...REALSXP g1c7 [MARK] (len=2266, tl=0) 402.179,402.182,402.185,402.188,402.191,...
@7f9031a77a00 14 REALSXP g1c7 [MARK] (len=1981, tl=0) 403.021,403.024,403.027,403.03,403.033,...
...
> .Internal(inspect(z))
@108210000 19 VECSXP g1c7 [MARK,NAM(7)] (len=34840, tl=0)
@7f904eea7660 14 REALSXP g1c0 [MARK,NAM(7)] matter vector (mode=4, len=1129, mem=0)
@7f9050347498 14 REALSXP g1c0 [MARK,NAM(7)] matter vector (mode=4, len=890, mem=0)
@7f904d286b20 14 REALSXP g1c0 [MARK,NAM(7)] matter vector (mode=4, len=1878, mem=0)
@7f904fd38820 14 REALSXP g1c0 [MARK,NAM(7)] matter vector (mode=4, len=2...
2019 Jul 17
2
ALTREP wrappers and factors
...3, len=3, mem=0)
Here is what I get without a wrapper:
> fc1 <- structure(y, class="factor", levels=levels(x))
> .Internal(inspect(fc1))
@7fb0cae66408 13 INTSXP g0c2 [OBJ,NAM(2),ATT] (len=3, tl=0) 1,1,2
ATTRIB:
@7fb0ce771868 02 LISTSXP g0c0 []
TAG: @7fb0c80043d0 01 SYMSXP g1c0 [MARK,LCK,gp=0x4000] "class" (has value)
@7fb0c9fcbe90 16 STRSXP g0c1 [NAM(7)] (len=1, tl=0)
@7fb0c80841a0 09 CHARSXP g1c1 [MARK,gp=0x61] [ASCII] [cached] "factor"
TAG: @7fb0c8004050 01 SYMSXP g1c0 [MARK,NAM(7),LCK,gp=0x4000] "levels" (has value)
@7fb...
2019 Jul 23
3
Any plans for ALTREP lists (VECSXP)?
...2.188,402.191,...
> > @7f9031a77a00 14 REALSXP g1c7 [MARK] (len=1981, tl=0)
> 403.021,403.024,403.027,403.03,403.033,...
> > ...
> >
> > > .Internal(inspect(z))
> > @108210000 19 VECSXP g1c7 [MARK,NAM(7)] (len=34840, tl=0)
> > @7f904eea7660 14 REALSXP g1c0 [MARK,NAM(7)] matter vector (mode=4,
> len=1129, mem=0)
> > @7f9050347498 14 REALSXP g1c0 [MARK,NAM(7)] matter vector (mode=4,
> len=890, mem=0)
> > @7f904d286b20 14 REALSXP g1c0 [MARK,NAM(7)] matter vector (mode=4,
> len=1878, mem=0)
> > @7f904fd38820 14 REALSXP g1...
2014 Apr 02
0
special handling of row.names
...rame, the compact form is c(NA_integer_,-n), as in:
> d <- data.frame(x=1:10)
> .Internal(inspect(d))
@104f174a8 19 VECSXP g0c1 [OBJ,NAM(2),ATT] (len=1, tl=0)
@103a7dc60 13 INTSXP g0c4 [] (len=10, tl=0) 1,2,3,4,5,...
ATTRIB:
@104959380 02 LISTSXP g0c0 []
TAG: @100823078 01 SYMSXP g1c0 [MARK,LCK,gp=0x4000] "names" (has value)
@104f17748 16 STRSXP g0c1 [NAM(2)] (len=1, tl=0)
@10085c678 09 CHARSXP g1c1 [MARK,gp=0x61] [ASCII] [cached] "x"
TAG: @10082d060 01 SYMSXP g1c0 [MARK,LCK,gp=0x4000] "row.names" (has value)
@104f0e898 13 INTSXP g...
2019 Jul 24
1
[External] Re: Any plans for ALTREP lists (VECSXP)?
...EALSXP g1c7 [MARK] (len=1981, tl=0)
> >> 403.021,403.024,403.027,403.03,403.033,...
> >>> ...
> >>>
> >>>> .Internal(inspect(z))
> >>> @108210000 19 VECSXP g1c7 [MARK,NAM(7)] (len=34840, tl=0)
> >>> @7f904eea7660 14 REALSXP g1c0 [MARK,NAM(7)] matter vector (mode=4,
> >> len=1129, mem=0)
> >>> @7f9050347498 14 REALSXP g1c0 [MARK,NAM(7)] matter vector (mode=4,
> >> len=890, mem=0)
> >>> @7f904d286b20 14 REALSXP g1c0 [MARK,NAM(7)] matter vector (mode=4,
> >> len=1878, mem...
2019 Jul 18
0
ALTREP wrappers and factors
...f530 14 REALSXP g0c3 [NAM(1)] (len=3, tl=0) 1,2,3
> > attr(a,"dim")=c(1,3)
> > .Internal(inspect(a))
> @0x000000002384f530 14 REALSXP g0c3 [NAM(1),ATT] (len=3, tl=0) 1,2,3
> ATTRIB:
> @0x0000000023864b58 02 LISTSXP g0c0 []
> TAG: @0x00000000044b1a90 01 SYMSXP g1c0 [MARK,LCK,gp=0x4000] "dim"
> (has value)
> @0x000000002384cb48 13 INTSXP g0c1 [NAM(7)] (len=2, tl=0) 1,3
>
*This would cause a duplication, even though the function test does
nothing.*
> > test<-function(x) x1=x
> > a=c(1,2,3)
> > .Internal(inspect(a))...
2013 Aug 18
1
How does R_UnboundValue and removing variables work?
Reading "R Internals" made me believe that R_UnboundValue was a placeholder
that would be skipped over in variable lookup. viz. the section of R
Internals "Hash tables" says "items are not actually deleted but have their
value set to R_UnboundValue.", which seems to align with what I read in
envir.c.
So, I reasoned, if I have a function that returns R_UnboundValue,
2019 Jul 23
0
Any plans for ALTREP lists (VECSXP)?
...6, tl=0) 402.179,402.182,402.185,402.188,402.191,...
> @7f9031a77a00 14 REALSXP g1c7 [MARK] (len=1981, tl=0) 403.021,403.024,403.027,403.03,403.033,...
> ...
>
> > .Internal(inspect(z))
> @108210000 19 VECSXP g1c7 [MARK,NAM(7)] (len=34840, tl=0)
> @7f904eea7660 14 REALSXP g1c0 [MARK,NAM(7)] matter vector (mode=4, len=1129, mem=0)
> @7f9050347498 14 REALSXP g1c0 [MARK,NAM(7)] matter vector (mode=4, len=890, mem=0)
> @7f904d286b20 14 REALSXP g1c0 [MARK,NAM(7)] matter vector (mode=4, len=1878, mem=0)
> @7f904fd38820 14 REALSXP g1c0 [MARK,NAM(7)] matter vector...
2019 Jul 19
2
ALTREP wrappers and factors
...; > > fc1 <- structure(y, class="factor", levels=levels(x))
> > > .Internal(inspect(fc1))
> > @7fb0cae66408 13 INTSXP g0c2 [OBJ,NAM(2),ATT] (len=3, tl=0) 1,1,2
> > ATTRIB:
> > @7fb0ce771868 02 LISTSXP g0c0 []
> > TAG: @7fb0c80043d0 01 SYMSXP g1c0 [MARK,LCK,gp=0x4000] "class" (has
> > value)
> > @7fb0c9fcbe90 16 STRSXP g0c1 [NAM(7)] (len=1, tl=0)
> > @7fb0c80841a0 09 CHARSXP g1c1 [MARK,gp=0x61] [ASCII] [cached]
> > "factor"
> > TAG: @7fb0c8004050 01 SYMSXP g1c0 [MARK,NAM(7),LCK,...
2010 Nov 12
1
SEXPs and slots
Hello,
I've created this class:
setClass("example",
representation (
size = "numeric",
id = "character"
)
)
Suppose I create a new instance of this class:
> x <- new("example", 4, "id_value")
This creates an S4 object with two slots. Am I correct in thinking that
slots are "filled" by SEXPs?
2019 Jul 24
0
[External] Re: Any plans for ALTREP lists (VECSXP)?
...;>> @7f9031a77a00 14 REALSXP g1c7 [MARK] (len=1981, tl=0)
>> 403.021,403.024,403.027,403.03,403.033,...
>>> ...
>>>
>>>> .Internal(inspect(z))
>>> @108210000 19 VECSXP g1c7 [MARK,NAM(7)] (len=34840, tl=0)
>>> @7f904eea7660 14 REALSXP g1c0 [MARK,NAM(7)] matter vector (mode=4,
>> len=1129, mem=0)
>>> @7f9050347498 14 REALSXP g1c0 [MARK,NAM(7)] matter vector (mode=4,
>> len=890, mem=0)
>>> @7f904d286b20 14 REALSXP g1c0 [MARK,NAM(7)] matter vector (mode=4,
>> len=1878, mem=0)
>>> @7f904...
2010 Nov 15
1
SEXP and slots
...eally have to know the detailed representation, but one
>> can find out from
>>
>> > .Internal(inspect(eg))
>> @df70e48 25 S4SXP g0c0 [OBJ,NAM(2),gp=0x10,ATT]
>> ATTRIB:
>> @df70ef0 02 LISTSXP g0c0 []
>> TAG: @769258 01 SYMSXP g1c0 [MARK] "size"
>> @c0f6db8 14 REALSXP g0c1 [NAM(2)] (len=1, tl=0) 4
>> TAG: @15b0228 01 SYMSXP g1c0 [MARK,NAM(2)] "id"
>> @c0f6178 16 STRSXP g0c1 [NAM(2)] (len=1, tl=0)
>> @12341c80 09 CHARSXP g0c2 [gp=0x20] "id_value&quo...
2013 Oct 21
2
Assigning empty symbol to variable.
When a variable is assigned the empty symbol, looking up the variable
results in an error message that looks like a function call:
> foo <- as.list(lm)$data
> ls()
[1] "foo"
> foo
Error: argument "foo" is missing, with no default
> get("foo")
Error in get("foo") : argument "foo" is missing, with no default
> rm("foo")
2009 Sep 29
3
How do I access class slots from C?
Hi
I'm trying to implement something similar to the following R snippet using
C. I seem to have hit the wall on accessing class slots using C.
library(fPortfolio)
lppData <- 100 * LPP2005.RET[, 1:6]
ewSpec <- portfolioSpec()
nAssets <- ncol(lppData)
setWeights(ewSpec) <- rep(1/nAssets, times = nAssets)
ewPortfolio <- feasiblePortfolio(
data = lppData,
spec = ewSpec,
2019 Jan 22
2
Objectsize function visiting every element for alt-rep strings
...) #
> > .Internal(inspect(x))
> @80255f8 14 REALSXP g0c0 [NAM(7)] 1 : 1000000000000000 (compact)
> >
>
> > cx <- as.character(x)
> > .Internal(inspect(cx))
> @80485d8 16 STRSXP g0c0 [NAM(1)] <deferred string conversion>
> @80255f8 14 REALSXP g1c0 [MARK,NAM(7)] 1 : 1000000000000000 (compact)
> > system.time( print(object.size(x)), gc=FALSE)
> 8000000000000048 bytes
> user system elapsed
> 0.000 0.000 0.001
> > system.time( print(object.size(cx)), gc=FALSE)
> Error: cannot allocate vector of size 83886...
2019 Jan 21
0
Objectsize function visiting every element for alt-rep strings
...1] FALSE
> xs <- sort(x) #
> .Internal(inspect(x))
@80255f8 14 REALSXP g0c0 [NAM(7)] 1 : 1000000000000000 (compact)
>
> cx <- as.character(x)
> .Internal(inspect(cx))
@80485d8 16 STRSXP g0c0 [NAM(1)] <deferred string conversion>
@80255f8 14 REALSXP g1c0 [MARK,NAM(7)] 1 : 1000000000000000 (compact)
> system.time( print(object.size(x)), gc=FALSE)
8000000000000048 bytes
user system elapsed
0.000 0.000 0.001
> system.time( print(object.size(cx)), gc=FALSE)
Error: cannot allocate vector of size 8388608.0 Gb
Timing stopp...
2019 Jan 23
1
Objectsize function visiting every element for alt-rep strings
...14 REALSXP g0c0 [NAM(7)] 1 : 1000000000000000 (compact)
>>> >
>>>
>>> > cx <- as.character(x)
>>> > .Internal(inspect(cx))
>>> @80485d8 16 STRSXP g0c0 [NAM(1)] <deferred string conversion>
>>> @80255f8 14 REALSXP g1c0 [MARK,NAM(7)] 1 : 1000000000000000 (compact)
>>> > system.time( print(object.size(x)), gc=FALSE)
>>> 8000000000000048 bytes
>>> user system elapsed
>>> 0.000 0.000 0.001
>>> > system.time( print(object.size(cx)), gc=FALSE)
>...
2019 Jan 15
4
Objectsize function visiting every element for alt-rep strings
I have a toy alt-rep string package that generates randomly seeded strings.
example:
library(altstringisode)
x <- altrandomStrings(1e8)
head(x)
[1] "2PN0bdwPY7CA8M06zVKEkhHgZVgtV1" "5PN2qmWqBlQ9wQj99nsQzldVI5ZuGX" ... etc
object.size(1e8)
Object.size will call the set_altstring_Elt_method for every single
element, materializing (slowly) every element of the vector. This
2019 Jan 22
0
Objectsize function visiting every element for alt-rep strings
...))
> > @80255f8 14 REALSXP g0c0 [NAM(7)] 1 : 1000000000000000 (compact)
> > >
> >
> > > cx <- as.character(x)
> > > .Internal(inspect(cx))
> > @80485d8 16 STRSXP g0c0 [NAM(1)] <deferred string conversion>
> > @80255f8 14 REALSXP g1c0 [MARK,NAM(7)] 1 : 1000000000000000 (compact)
> > > system.time( print(object.size(x)), gc=FALSE)
> > 8000000000000048 bytes
> > user system elapsed
> > 0.000 0.000 0.001
> > > system.time( print(object.size(cx)), gc=FALSE)
> > Error: cannot...
2020 Jul 22
3
Invisible names problem
I ran into strange behavior when removing names.
Two ways of removing names:
i <- rep(1:4, length.out=20000)
k <- c(a=1, b=2, c=3, d=4)
x1 <- unname(k[i])
x2 <- k[i]
x2 <- unname(x2)
Are they identical?
identical(x1,x2) # TRUE
but no
identical(serialize(x1,NULL),serialize(x2,NULL)) # FALSE
But problem is with serialization type 3, cause: