search for: csingl

...$ type : chr "miMATRIX" $ signed : logi NA $ sizeOf : int 0 $ what : num 0 $ nbrOfBytes: int 56 $ padding : num 0 $ compressed: logi FALSE num 0 List of 1 $ : num [1, 1] 0 ..- attr(*, "Csingle")= logi TRUE List of 7 $ type : chr "miMATRIX" $ signed : logi NA $ sizeOf : int 0 $ what : num 0 $ nbrOfBytes: int 56 $ padding : num 0 $ compressed: logi FALSE num 0 List of 1 $...

...help. Type 'q()' to quit R. > dyn.load("foo.so") > .C("foo", as.single(1:3), DUP=F, PACKAGE="foo") hello world 0.000000 1.875000 00000000 3ff00000 00000000 (float) 1.0 in hex: 3f800000 (double) 1.0 in hex: 00000000 3ff00000 [[1]] [1] 1 2 3 attr(,"Csingle") [1] TRUE It's pretty clear from this that the array is getting passed as double, despite the documentation: > help(.C) ... stuff omitted... Numeric vectors in R will be passed as type 'double *' to C (and as 'double precision' to Fortran) unless (i) ...

...using cc] and the make check tests all worked [apart from the internet]. However I get the following, where weight is a column vector : > np <- sum(weight) > n <- nrow(weight) > weight <- as.single((n*weight)/np) Error in structure(.Internal(as.vector(x, "double")), Csingle = TRUE) : (list) object cannot be coerced to double > dim(weight) [1] 38 1 > version _ platform sparc-sun-solaris2.6 arch sparc os solaris2.6 system sparc, solaris2.6 status major 1 minor 9.1 year 2004 month 06 day 21 language R I have search...

...tsingle.f. It created a .so file without problem. The hope is, of course, that I'll use half as much memory. When I call hclustsingle, though, I get the same error as before (with the same amounts of memory), and the traceback says: 11: structure(.Internal(as.vector(x, "double")), Csingle = TRUE) 10: as.single.default(d) 9: as.single(d) ... So it looks as though changing to single can't help because the external function interface creates a double precision vector anyway. Is this correct? Thanks very much. Matthew Wiener Applied Computer Science and Mathematics Department M...

I noticed taht R cannot understand certain Fortran real constant formats. For instance: c14 <- as.double( 7.785205408500864D-02) Error: unexpected symbol in " c14 <- as.double( 7.785205408500864D" The above "D" is used in Fortran language to indicate the memory starage mode. That is for instructing Fortran compiler to store such a REAL constant in DOUBLE

...racter strings can now, with most compilers, be passed on and from Fortran. See ?Foreign for details. o Functions as.single and single now have the effect with .C and .Fortran of passing a numeric argument as float/REAL rather than as double/DOUBLE PRECISION, by setting the attribute "Csingle". See ?Foreign for details. o Comparison of strings uses the current locale on systems where this is available, and so is always consistent with the ordering used by sort(). o sapply has a new argument USE.NAMES=TRUE and now returns a named result when its input was a ch...

...racter strings can now, with most compilers, be passed on and from Fortran. See ?Foreign for details. o Functions as.single and single now have the effect with .C and .Fortran of passing a numeric argument as float/REAL rather than as double/DOUBLE PRECISION, by setting the attribute "Csingle". See ?Foreign for details. o Comparison of strings uses the current locale on systems where this is available, and so is always consistent with the ordering used by sort(). o sapply has a new argument USE.NAMES=TRUE and now returns a named result when its input was a ch...

...nd as double precision to Fortran) Also, see the help page for "double" > ?double R has no single precision data type. All real numbers are stored in double precision format. The functions as.single and single are identical to as.double and double except they set the attribute Csingle that is used in the .C and .Fortran interface, and they are intended only to be used in that context. HTH Steven McKinney, Ph.D. Statistician Molecular Oncology and Breast Cancer Program British Columbia Cancer Research Centre email: smckinney +at+ bccrc +dot+ ca tel: 604-675-8000 x7561 BC...