[R] possibly Error in R version 2.12.1 (2010-12-16)
Frank Schwidom
schwidom at gmx.net
Thu Feb 2 21:24:57 CET 2012
Hi,
the following Code demonstrates an possibly Error in R
(or you can explain me, why this happens, thanks in advance)
Code:
#####################################
testClass <- function( stackData= c())
{
list(
write= function( ...)
{
sChain= ""
for( s in c( stackData, ...))
{
sChain= paste( sChain, '"', sub( '"', '\\\\"', s), '"', sep, sep='')
}
write( sChain, fHandle, append=TRUE)
},
stackIt1 = function( ...)
{
testClass( stackData= c( stackData, ...))
},
stackIt2 = function( ...)
{
tmp= c( stackData, ...)
testClass( stackData= tmp)
},
getStack = function()
{
stackData
},
NULL
)
}
to1= testClass()
for( i in 4:2)
{
to1= to1$stackIt1( i)
}
print( all( rep( 2, 3) == to1$getStack())) # error!
to2= testClass()
for( i in 4:2)
{
to2= to2$stackIt2( i)
}
print( all( 4:2 == to2$getStack())) # correct!
# what ist the difference between stackIt1 and stackIt2?
# (error appears only by using an for loop)
"
> version
_
platform i486-pc-linux-gnu
arch i486
os linux-gnu
system i486, linux-gnu
status
major 2
minor 12.1
year 2010
month 12
day 16
svn rev 53855
language R
version.string R version 2.12.1 (2010-12-16)
Regards
"
##################################### End of Code
written in an R-File and called per source( '<Fname>.R')
shows 2 subsequent outputs of 'TRUE', which is not ok
in my mind
Thanks for your attention
More information about the R-help
mailing list