search for: testout

...'numeric', 'complex', 'character', 'raw' and 'list': > 'list' values should have elements which are one of the first six types listed or 'NULL'. I have tried to use a list within a "what" list : f <- scan(file="c:/test/testout.csv",what=list(hi=0.0,bye="",wave=list(1:1000)),sep=",",skip=1) and the following error is returned: "c:/test/testout.csv", what = list(hi = 0, bye = "", : unimplemented type 'list' in 'extractItem' So, is my syntax confusi...

Greetings guRus -- I have successfully queried a large (24,445 rows by 281 cols.) in-house database using the following RODBC query (without the line breaks) testout <- sqlQuery(channel, "select idSchedule,EXCL_Total from dbo.vwC1198_2006_RawData_With_CMPL_EXCL") This returns a dataframe of 24445 rows and two columns (as intended), but the following command testout <- sqlFetch(channel,"dbo.vwC1198_2006_RawData_With_CMPL_EXCL",c...

...y examples I'm looking at seem to depend on a data frame being just the two columns on which to operate, without any way to designate which columns to use in the function(x,y) part of an lapply statement. Another alternative would be a for loop, but when I try this: for(i in 1:nrow(test2)) { testout[i] <- (test2$end[i] - test2$start[i]) } I get an error. So I'm stuck at the first step here. I think that once I can figure out how to get the differences, I can use cbind to append the data frame. But if there is a better way to do it, I'd like to know that as well. Any help is appre...

...0% 25% 50% 75% 100% -2.4736219 -0.7915433 -0.1178056 0.7023577 2.9158617 The decimal point is at the | -2 | 510 -1 | 7631110 -0 | 9988777333333211 0 | 01124455557777889 1 | 00045 2 | 19 > > # Now run it and save the file > sink("Testout.txt") > source("Test.R") > sink() > > # What is located in "Testout.txt"? > cat(readLines("Testout.txt"), sep="\n") 0% 25% 50% 75% 100% -2.47511893 -0.47919111 0.05761628 0.67403447 1.79825459...

.... Comment 1: Hello I have spent a while today trying to get odfWeave to be successful I installed the unzip and zip program but it has not changed the error message.I have copied the error message below but I am sure it is the one others have experienced. > odfWeave('test.odt','testOut.odt') Copying test.odt Setting wd to C:\Users\Mark\AppData\Local\Temp\RtmpHPp0yb/odfWeave30211245749 Unzipping ODF file using unzip -o "test.odt" Error in odfWeave("test.odt", "testOut.odt") : Error unzipping file In addition: Warning message: In system...

Hello, I have an input file: http://r.789695.n4.nabble.com/file/n3700031/testOut.txt testOut.txt where col 1 is chromosome, column2 is start of region, column 3 is end of region, column 4 and 5 is base position, column 6 is total reads, column 7 is methylation data, and column 8 is the strand. I would like a summary output file such as: http://r.789695.n4.nabble.com/file/n...

Hi Eric,Thanks for the explanation. Is there a way to save the results automatically after the analysis gets over?. As I recently lost the results, because I didn't save the results. I don't want to run the sink or save command after the analysis is over rather run the command for saving the file before starting to run the analysis, so the file gets saved automatically after the script has

...? ? ? ? 0%? ? ? ? 25%? ? ? ? 50%? ? ? ? 75%? ? ? 100% -2.4736219 -0.7915433 -0.1178056? 0.7023577? 2.9158617 ? The decimal point is at the | ? -2 | 510 ? -1 | 7631110 ? -0 | 9988777333333211 ? 0 | 01124455557777889 ? 1 | 00045 ? 2 | 19 > > # Now run it and save the file > sink("Testout.txt") > source("Test.R") > sink() > > # What is located in "Testout.txt"? > cat(readLines("Testout.txt"), sep="\n") ? ? ? ? 0%? ? ? ? 25%? ? ? ? 50%? ? ? ? 75%? ? ? ? 100% -2.47511893 -0.47919111? 0.05761628? 0.67403447? 1.79825459 ? T...

Hi, I would like to get all X iterations in optim output in matrix form. I know about the follow approach: sink("reportOptim") optim( ......., control=list( trace=6,..........) ) sink() all_iterOptim <- readLines("reportOptim") unlink("reportOptim") all_iterOptim <- all_iterOptim[ grep( '^X', all_iterOptim ) ] ### TODO: the rest !!! :-) But it is very

Back to my favourite R subject: batch mode. Some months ago, I pointed out how the default of saving .RData automatically in batch can often lead to completely erroneous results when using data.frames. Basically the idea of .RData is to save the environment to start where one left off. This will generally be quite different than where one started the session. The idea of a batch file is to redo a

...t;) 0% 25% 50% 75% 100% -2.4736219 -0.7915433 -0.1178056 0.7023577 2.9158617 The decimal point is at the | -2 | 510 -1 | 7631110 -0 | 9988777333333211 0 | 01124455557777889 1 | 00045 2 | 19 > > # Now run it and save the file > sink("Testout.txt") > source("Test.R") > sink() > > # What is located in "Testout.txt"? > cat(readLines("Testout.txt"), sep="\n") 0% 25% 50% 75% 100% -2.47511893 -0.47919111 0.05761628 0.67403447 1.79825459 The...

...o llvm and trying to convert some c files to bitcode and convert them back to c code. my command line is pretty simple and verymuch like commands in "Can I use LLVM to convert C++ code to C code?" dragonegg_disable_version_check=1 llvm-gcc -emit-llvm test.c -o test -c llc -march=c test -o testout.c so I meant to compile test.c, which can be compiled and run by normal gcc, to bitcode, and use lcc -march=c to convert it back to c code. but I recieve this: llc: test:1:1: error: expected top-level entity ELFX4( U0EMUMEUEMUUMEEMU=MEU so please could someone tell me how can I get...

...freq ",frequency[i]) writeChar(freq,out,nchars=nchar(freq,type="chars")) flush(out) Sys.sleep(.05) } #sometimes this loop doesn't finish on first try, sometimes I'll get one successful loop, sometimes 3-4. testno=data.frame(response) testout=paste("/home/bob/TMP/test",j,".csv") write.csv(testno,testout) num=paste("test Number ",j) print(num) } #A few times this loop has successfully completed. Most of the time it doesn't. writeLines("\"quit\"",con=out,sep="\n&qu...

...9;m able to do using a combination of RGDAL and r-base commands. Below is the basic structure, the input file "elev" can be any image file GDAL supports -- the code below just "copies" the image one line at a time: ### library(rgdal) infile='elev' outfile_base='testout' outfile_ext='.bil' outfile=paste(outfile_base,outfile_ext,sep='') outcon <- file(outfile, "wb") infile_info=GDALinfo(infile) nl=infile_info[[1]] ns=infile_info[[2]] for (row in 1:nl) { templine <- readGDAL(infile,region.dim=c(1,ns),offset=c(row-1,0)) w...

Ein eingebundener Text mit undefiniertem Zeichensatz wurde abgetrennt. Name: nicht verf?gbar URL: <https://stat.ethz.ch/pipermail/r-help/attachments/20130304/62581e97/attachment.pl>

...def f(name): sys.stdin.close() sys.stdout.close() sys.stderr.close() os.close(0) # close C's stdin stream os.close(1) # close C's stdout stream os.close(2) # close C's stderr stream time.sleep(2) f = open('/var/lib/asterisk/agi-bin/tns/testing/testout.txt', 'w') f.write(name) f.close() if __name__ == '__main__': print('before process') mp.set_start_method('fork') q = mp.Queue() p = mp.Process(target=f, args=('asterisk',)) p.start() sys.exit() On 30 June 2017 at 19:59,...

I use a python AGI which pulls some info from a web service, which should take half a second. Sometimes, it takes 5-10 seconds which blocks the dialplan execution, but the dialplan should continue immediately as it's not dependent on the AGI/web service data. What's the simplest, easiest quickest least-code way of firing off an AGI with some variable, and then returning to the dialplan?