Displaying 4 results from an estimated 4 matches for "junk3".
Did you mean:
junk
2010 Mar 04
3
Issues when volume is full
...996G 1.5T 40% /backup
/dev/mapper/spool 500G 499G 1.6G 100% /spool
lsddomainsd:/spool# dd if=/dev/zero of=junk2 bs=1024000
dd: writing `junk2'': No space left on device
1+0 records in
0+0 records out
0 bytes (0 B) copied, 0.0704083 s, 0.0 kB/s
lsddomainsd:/spool# dd if=/dev/zero of=junk3 bs=1024000
dd: writing `junk3'': No space left on device
1+0 records in
0+0 records out
0 bytes (0 B) copied, 0.108706 s, 0.0 kB/s
lsddomainsd:/spool# ls -lh
total 498G
-rw-r--r-- 1 root root 498G 2010-03-04 09:54 junk
-rw-r--r-- 1 root root 0 2010-03-04 13:45 junk2
-rw-r--r-- 1 root roo...
2008 Nov 04
1
contour plot, failing to interpolate through all data
...t;5",-0.95,NA,NA,NA,NA,NA
####End data
####start code
junk2<-as.matrix(read.csv(file='testmatrix.csv'))
colnames(junk2)<-as.character(seq(.5,3,by=.5))
contour(ylim=c(-1,1),as.numeric(rownames(junk2)),as.numeric(colnames(jun
k2)), junk2,levels=c(seq(-1,0,by=.1),seq(1,23,by=2)))
junk3<-cbind(as.numeric(colnames(junk2)[as.vector(col(junk2))]),as.numer
ic(row.names(junk2)[as.vector(row(junk2))]),as.numeric(as.vector(junk2))
)
text(junk3[,1],junk3[,2],junk3[,3],cex=.5)
#### End code
_______________________________________________________
Michael Folkes
Salmon Stock Assessment...
2007 Sep 30
1
Save and load workspace in R: strange error.
Hi,
I tried to load a .RData object on unix system using R, it gives error:
Error: restore file may be empty -- no data loaded
In addition: Warning message:
file 'junk3.RData' has magic number ''
Use of save versions prior to 2 is deprecated
This happens only for using MY user account for the Unix system. I
tried to use a friends's user account to load the same data object, it is
fine. And it never happened to me before until sometime last we...
2007 Dec 10
0
problem using "by" with custom function?
...ern.est
function(data) {
x.var <- (data$x / sd(data$x)); y.var <- (data$y / sd(data$y))
dpik.x <- dpik(x.var, gridsize = round((max(data$x) - min(data$x))/100))
dpik.y <- dpik(y.var, gridsize = round((max(data$y) - min(data$y))/100))
bw.avg <- ((dpik.x + dpik.y)/2)
by command used:
junk3 <- by(w079.all[,5:6], w079.all$animonth, kern.est)
output from small files (only a few levels of animonth):
w079.all$animonth: W079_1
[1] 0.2117635
-----------------------------------------------------------------------------------------------------------------
w079.all$animonth: W079_12
[1] 0...