search for: 04d

Full_Name: Peter Ehlers Version: rw2001pat (2005-02-03) OS: Win XP Submission from: (NULL) (136.159.61.115) formatC(1, flag="s") crashes Rgui. Similarly for flag=[SnZ]. Stupid input, of course, but I'm error-prone. Peter

...ain to increase / descrease message volume > to be read from voicemail.conf */ 1920a1924,1940 > case '3': > if (volgain = ast_variable_retrieve(cfg, "general", "volgain")) > { > ast_log(LOG_NOTICE,"New Increase Volume Messages # %04d\n",curmsg); > snprintf(sys, sizeof(sys), "sox %s/msg%04d.WAV %s/new.WAV vol %s; mv %s/new.WAV %s/msg%04d.WAV\n", curdir, curmsg, curdir, volgain, curdir, curdir, curmsg); > ast_log(LOG_NOTICE,"%s\n",sys); > system(sys); /* Make system call to increase v...

...r me. Thanks, Steve Dutky On Mon, 14 Feb 2005 11:02:20 +0000 (GMT), Prof Brian Ripley wrote: +On Mon, 14 Feb 2005, Wolfgang Huber wrote: + +> Dear Prof. Ripley, +> +> Would it be possible to make sprintf accept vector arguments? +> I.e. allow expressions like +> sprintf("%04d", 1:3) +> to produce something like what currently needs to be done via +> sapply(1:3, function(i) sprintf("%04d",i)) + +I have thought about this, but it is not really clear what the right thing +would be here with multiple arguments. What should + +sprintf(("%04d %s...

...understand what it meant. Second, I'm trying to use a system call to write files with names based on an integer value in an R variable (in this case the variable is called "i"). As above, I can do this (on a GNU/Linux system): > system( "cat -", input=sprintf("%04d", i) ) 0005 I am running bash, but system calls go to sh. I want to be able to put that input string ("0005") into a variable and do something like this: system( "i=`cat /dev/stdin` ; run_script > file${i}.out" , input=sprintf("%04d", i) ) I think my probl...

Dear R users, I have numerous data sets (csv files) saved in the folder which has the same name as individual data. (i.e data x1 saved in x1 folder, data x2 in x2 folder etc) I would like to read in the desired data set name using 'scan' function and assign this inputted value to an object so that it can be used in the 'read.csv' function. For example, x <- scan() 1: 0708

...e highest=${partfilename/.txt/} while [[ $highest = 0* ]]; do highest=${highest#0}; done # bash does not like leading zeros if [ ${#highest} -eq 0 ]; then highest=0; fi # ...or blanks for math realcount=0 for ((x=0;x<=${highest};x+=1)); do chkname=msg$(printf "%04d" $x) # build name - pad with zeros... if [ -e ${msgdir}/${chkname}.txt ]; then if [ $realcount -ne $x ];then newname=msg$(printf "%04d" $realcount) for idivfile in $(ls -A ${msgdir}/${chkname}.*); do mv ${idivfile} ${msgdir}...

...assigned. I've attempted to rectify this, but have only come up against further errors. The code as it stands, is as follows: # READ IN FILES FROM DISK # File names have two variable parts: creating a 'file index' is a two-step process index <- expand.grid(year = sprintf("%04d", seq(1986, 1995)), month = sprintf("%02d", 1:12)) filelist <- paste("C:\\Documents and Settings\\Data\\comp_runoff_hd_", paste(index$year, index$month, sep=''), '.asc', sep='') filelist # Assign file names to individual objects with variable n...

...e around 1000 *.txt files, I've generate with other software. I've now done the following code (below). My question is how can I automate this (with do.call () ?), so it could be done for all the *.txt files. Thanks in advance, Rog??rio names<- list.files() file <- "BLU_Var_%04d.txt" for(i in 1:1000){ blumenau<-read.table("Blu_1.txt",h=T) # 1000 *.txt files Guildas<-data.frame(cbind(t(blumenau[2:50]))) Guilda1<-cbind(X27,X48) Guilda2<-cbind(X5,X17,X19,X20,X21,X24,X25,X26,X40,X41,X77) Guilda3<-cbind(X22,X28,X69) Guilda4<-cbind(X29,X30,X31,...

...rings.ml +++ b/generator/docstrings.ml @@ -68,9 +68,7 @@ let version_added = function Some (sprintf "%d.%d.%d" major minor release) | _ -> None -let copyright_years = - let this_year = 1900 + (localtime (time ())).tm_year in - if this_year > 2009 then sprintf "2009-%04d" this_year else "2009" +let copyright_years = "2009-2018" (* Generate a header block in a number of standard styles. *) type comment_style = -- 2.16.4

....get_node g root controller_path with - | None -> - error (f_"cannot find HKLM\\SYSTEM\\%s in the guest registry") - (String.concat "\\" controller_path) - | Some node -> - let rec loop node i = - let controller_offset = sprintf "%04d" i in - let child = g#hivex_node_get_child node controller_offset in - if child = 0_L then controller_offset else loop node (i+1) - in - loop node 0 in + let controller_offset = get_controller_offset g root controller_path in let regedits = [ controller...

...r, $old, $new) = @_; my $oldfile, $newfile; return if ($mbox eq $newmbox); @@ -788,7 +788,7 @@ # print header; foreach $msg (@msgs) { # print "Forwarding $msg from $mbox to $newmbox<BR>\n"; - &message_copy($context, $mbox, $folder, $msg, $newmbox, sprintf "%04d", $msgcount); + &message_copy($mbox, $newmbox, $folder, $msg, sprintf "%04d", $msgcount); $msgcount++; } $txt = "Forwarded messages " . join(', ', @msgs) . "to $newmbox";

This patchset attempts to address a number of shortcomings in the firstboot infrastructure I came across while working with v2v conversion of various Windows VMs. Roman Kagan (4): firstboot: consolidate line ending conversion firstboot: enhance firstboot driver script for Windows firstboot: make script naming descriptive convert_windows: split firstboot into steps

Hi, Is it possible to configure Asterisk to fetch for files from the spool directory in different directories? For example, fetch voicemail files in /abc/voicemail and call files in /cde/outgoing ?. And is it possible to configure the filename that Asterisk gives to files, like voicemail files? Thanks, Ricardo

...= 1, labels = names(Groups), xpd = T , cex=.75, ) mtext(side = 1, line=5, text="% of Services above thresholds ") mtext(side=2, line=2.5, text="Percent") title(main="") box() # -------------------plot to png file------------------------------ png('gr_%04d.png', width=600, height=400) mp <- barplot(Groups, beside=T , horiz=F , las=1, ylim=c(0,60), axisnames=F, font.lab=2, col=Mycolours ) text(mp, par("usr")[3] - 1.5, srt = 45, adj = 1, labels = names(Groups), xpd = T , cex=.75, ) mtext(side = 1, line=5, text=...

Hi, I'm sending a series of patches implementing quota support into ocfs2-tools. It's the same as the original huge patch I've sent but now it's split as Joel asked. I've also realized that when disabling SPARSE feature, we should update quota information. That piece of code is missing, I'll implement it soon. Comments welcome. Honza

...lf.delete_old @p = Pref.find_by_setting(''autodelete'') if @p and @p.value.to_i > 0 val = @p.value.to_i destroy_all(["found_on <= DATE_SUB(CURDATE(), INTERVAL ? DAY)", val]) end end def self.delete_before(params) date = sprintf("%04d-%02d-%02d", params[:foundon][:year], params[:foundon][:month], params[:foundon][:day]) deleted = Resume.destroy_all(["found_on <= ?", date]) optimize_index deleted.length end validates_uniqu...

...and compile with: gcc imaptest.c -o imaptest -Wall -W -I. -Isrc/lib -DHAVE_CONFIG_H src/lib/liblib.a As per Timo's instructions. # imaptest -h imaptest [USER at IP:PORTNO] [pass=PASSWORD] [mbox=MBOX] [clients=CC] [msgs=NMSG] [use_authenticate] [PORTNO] USER = template for username. "u%04d" will generate users "u0001" to "u0100" MBOX = path to mbox from which we read mails to append. CC = number of concurrent clients. [20] NMSG = target number of messages in INBOX. [100] If use_authenticate is given AUTHENTICATE will be used instead of LOGIN. Have fun! Jen...

On Thu, Aug 25, 2016 at 08:33:46AM +0100, Nux! wrote: > I've rebuilt libmateweather for EL7 with the aforementioned patch and it seems to have fixed the issue. > Feel free to use it until EPEL package the fix. > > http://li.nux.ro/download/nux//tmp/libmateweather7/ thanks Nux! I installed it and it now gets current conditions just fine. but I tried several different locations

Hi all, I need to be able to delete a voicemail message using a program. Is is sufficient to simply delete the .wav and .txt files in the spool directory? Or do I need to also renumber the remaining files? For example, let say a given mailbox has 20 messages in it and I want to delete message number 5. Can I just delete the 2 files and expect that asterisk will renumber them? Or do I

...> > - strlcpy(drvinfo->version, DRIVER_VERSION, > > - sizeof(drvinfo->version)); > > + strlcpy(drvinfo->driver, KBUILD_MODNAME, sizeof(drvinfo- > > >driver)); > > snprintf(drvinfo->fw_version, sizeof(drvinfo->fw_version), > > "%d.%d.%04d (%.16s)", > > fw_rev_maj(mdev), fw_rev_min(mdev), > > fw_rev_sub(mdev), diff --git > > a/drivers/net/ethernet/mellanox/mlx5/core/en_rep.c > > b/drivers/net/ethernet/mellanox/mlx5/core/en_rep.c > > index 67247c33b9fd..ef2f8889ba0f 100644 > > --- a/drivers...