search for: in_fnam

Dear experts, I tried to put the two plots into one final PNG figure with the following script. However instead of giving 2 plots in one figure, it only gives the the last plot in one figure. What's wrong with my script below? __BEGIN__ in_fname <- paste("mydata.txt.",sep="") out_fname <- paste("finalplot.png",sep="") dat <- read.table(in_fname, comment.char = "!" , na.strings = "null"); dat.pca <- prcomp(dat[,1:ncol(dat)], retx=TRUE, scores=TRUE) trellis.device(&qu...

Hi all, I am trying to capture lines of a file that DO NOT start with the following header: !, #, ^ But somehow my regex used under grep doesn't work. Please advice what's wrong with my code below. __BEGIN__ in_fname <- paste("mydata.txt,".soft",sep="") data_for_R <- paste("data_for_R/", args[3], ".softR", sep="") # my regex construction cat(temp[-grep("^[\^\!\#]",temp,perl=TRUE)], file=data_for_R, sep="\n") dat <- read.tabl...

...been a while since I've done anything substantial in perl. I would have sent a patch but I suspect I'm the only person who will ever use this change and critiquing it would be easier with a full context. sub convert_subscriptions { my ($dir, $owner_uid, $owner_gid) = @_; my $in_fname = "$dir/courierimapsubscribed"; # ADDED: The bincimap file to parse my $in_fname2 = "$dir/.bincimap-subscribed"; my $out_fname = "$dir/subscriptions"; # MODIFIED: Return only if neither exist return if (!-f $in_fname && !-f $in_fname2);...

I've tested this only with a test user. http://dovecot.org/tools/courier-dovecot-migrate.pl http://wiki.dovecot.org/Migration/Courier # Migrate Courier IMAP (any version) and Courier POP3 (v0.43+) to Dovecot v1.0 # by Timo Sirainen. This is public domain. # Usage: [--quiet] [--convert] [--overwrite] [--recursive] [<conversion path>] # --quiet: Print only errors # --convert: Do