(0.2,
32, 90.34)), .Names = c("a", "b", "cdo"), row.names = c(NA, -3L
), class = "data.frame")
q10 = paste("ALTER TABLE df ADD newx AFTER b")
q11 = paste("UPDATE TABLE df SET newx = a+0.9")
sqldf(q10, qll)
R result: NULL
Thank you.
3.662
>#12 2004 Summer 37343.184
>#13 2001 Winter 7551.095
>#14 2002 Winter 5887.516
>#15 2003 Winter 20223.513
>#16 2004 Winter 13396.535
>
>A.K.
>
>Hi, how are you?
>
>I am trying to modify the existing R function so that it will
>chronologically order the
48.480
>#6 2002 Winter 5887.516
>#7 2002 Spring 4551.710
>#8 2002 Summer 5159.071
>#92002 Fall 10946.064
>#10 2003 Winter 20223.513
>#11 2003 Spring 14275.783
>#12 2003 Summer 16653.662
>#13 2003 Fall 13901.042
>#14 2004 Winter 13396.535
>#15 2004 Spring 10
Hi, I could not open the file.
Can you load the data into R and then use the dput function?
The first link deals with dput. The latter 2 links are for dealing with
NAs in data.
http://www.inside-r.org/r-doc/base/dput
dput {base}
http://r.789695.n4.nabble.com/subset-without-removing-NAs-td348201
ss = "data.frame", row.names = c(NA, -2L))), .Names =
c(":Bostoncitydata",
>":Chicagocitydata", ":NewYorkcitydata", ":Philadelphiacitydata",
>":Atlantacitydata", ":Baltimorecitydata"))
>
>
>temp1<-lapply(tem
2))
>lapply(names(temp3New),function(i) lapply(temp3New[[i]],function(x)
{plot(x[,1],x[,2],main="Fluxmaster
>versus EGRET/WRTDS \n Seasonal FLux
Sum",sub=paste(i,colnames(x)[2],sep="_"),xlab="Calendar Year
>Timesteps",ylab="Total Flux (kg/seas
;Fluxmaster versus
>EGRET/WRTDS \n Seasonal FLux
Sum",sub=paste(i,colnames(x)[2],sep="_"),xlab="Calendar Year
>Timesteps",ylab="Total Flux (kg/season)");lines(x[,1],x[,2])}))
>dev.off()
>A.K.
>
>
>
>
>
>
>__
R] multiple plots and looping assistance requested
>
>Hi,
>
>May be you can try:
>res1<- gsub("\\_.*\\_.*\\_.*","",x)
> res2<-sub("(\\w)(\\w)(\\w)(\\w)(\\w)(\\w)(\\w)(\\w)(\\w)(\\w)(\\w)$",
"",
>x,perl=TRUE)
> identical(res1,re
_F
for(i in x) {
pdf(paste0("output for ", sites,".pdf"))
xrange <- range("x1$i") # This would be the first set of sites for the
specified seasons
yrange <- range("y1")
plot(x, y1, xlab="Year, Season", ylab="Total Flux (kg/season)"
ataFrame
Can someone assist me in modifying the R code so that I can convert the
set of files to .shp files and then to .bnd files for BayesX?
Thank-you.
Irucka Embry
___Get
the Free email that has everyone talking at http://www.ma
ults<- setupYears(paLong = 3, paStart = 4, localDaily = Daily)
yield <- AnnualResults$Flux/INFO$drainSqKm
write.table(AnnualResults, file=paste(i ,
"/home/ie/IE2/Documents/USGS-2012-Work/SPARROW-Summer-2012-Work/EGRET/ca
libration/Calibration_Results/.AnnualResults"), append=T,col.name
ator =",")
Error in is.data.frame(x) : object 'Sample' not found
Can you assist me in fixing the attached function file?
Thank-you.
Irucka Embry
___Get
the Free email that has everyone talking at http://www.mail2world.co
is excerpted from.
Thank-you.
Irucka Embry
___Get
the Free email that has everyone talking at http://www.mail2world.com
target=new>http://www.mail2world.com Unlimited
Email Storage – POP3 – Calendar – SMS – Translator –
Muc
7 30
2
>#2 2011-06-03 00:30:00 2 28
10
>#3 2011-06-03 00:35:00 10 22
8
>#4 2011-06-03 00:40:00 7 27
11
>#5 2011-06-03 00:45:00 4
s actually two numbers, see the examples below:
01_00060_3 01_00060_3_cd 15_00060_3 15_00060_3_cd
02_00060_3 02_00060_3_cd
How can the following code be modified to reflect the numerical rather
than character prefix?
dat1[,c("datetime",colnames(dat1)[grep("00
subscript out of bounds
I am trying to only select 3 columns (datetime and then two partial name
columns that end in 00060_3 and 00060_3_cd. Each file that I
will be reading into the function has a different number of columns and
a different prefix in front of 00060_3 and 00060_00003_cd.
of the 74
observation sites.
Is there anyway to process the following commands through a function
that exports the set of 74 AnnualResults (each of the 4 season results
in order from Fall to Summer) to a .csv file?
I would like to thank you in advance.
Irucka Embry
file <- "nwis_wqdat
ubset (0 observations)
>
>On Dec 31, 2012, at 3:22 AM, Irucka Embry wrote:
>
>> Hi Jorge, thank-you for the quick response. That suggestion worked
>> perfectly.
>>
>
>> <-Original Message->
>>> From: Jorge I Velez [jorgeivanve...@gmail.com]
Hi Jorge, thank-you for the quick response. That suggestion worked
perfectly.
Have a Happy New Year too!
Irucka Embry
<-Original Message->
>From: Jorge I Velez [jorgeivanve...@gmail.com]
>Sent: 12/31/2012 5:05:14 AM
>To: iruc...@mail2world.com
>Cc: r-help@r-projec
Hi, how are you?
My name is Irucka Embry and I would like assistance on properly
subsetting some data obtained from a .csv file.
> file <-"info_n.csv"
> INFO<- getMetaDataFromFile(file)
INFO is 92 observations of 14 variables
> INFO<- subset(INFO,site.no==0216957
Hi Jean, thank-you again.
Both the assignment of names and the indices of the successful locations
worked perfectly.
Irucka Embry
<-Original Message->
>From: Adams, Jean [jvad...@usgs.gov]
>Sent: 12/28/2012 1:28:29 PM
>To: iruc...@mail2world.com
>Cc: r-help@r-projec
r f2 function.
>compare.all <- sapply(modeldepth, function(md)
mean((md==observeddepth)[md |
>observeddepth]))
>
>
>
>(3) My mistake again. There should be only single brackets, not double
brackets.
>justbig <- modeldepth[compare.all > 0.7]
>
>
>Jean
>
>
&
od.
Are there any suggestions on a specific R package to use in the Bayesian
inference steps?
Thank-you.
Irucka Embry
___Get
the Free email that has everyone talking at http://www.mail2world.com
target=new>http://www.mail2worl
modeldepth that only lists the specific 272x976 modeldepth data files
that had an f2 greater than 0.7
Is there any way to reduce the code? As you see, I am using the name for
all 54 files with both file and also modeldepth.
How can I create an f2 for each of the 54 comparisons?
Thank-you.
<- matrix(c(0, 1, 0, 0, 1, 1, 1, 0, 0),3,3,byrow=TRUE)
>data <- matrix(c(1, 1, 0, 0, 1, 0, 0, 0, 1),3,3,byrow=TRUE)
>
>f2(observed, data)
>
>
>Hope this helps,
>
>Rui Barradas
>
>Em 19-12-2012 15:10, Irucka Embry escreveu:
>
>Hi, how are you?
>
>I am try
ed and absent in the model) +
sum(probability of the matrix element where the matrix element is absent
in the observed and present in the model)]
What is the best way to create the f2 function in R?
Thank-you.
Irucka Embry
___Get
the Free
;myfile <-
>"/home/ie/Documents/TTU/GA_Research/GLUE/R-Project/R_GLUE_Example/Input
_Parameter.csv"
>
>count.fields(myfile, sep=";")
>
>Input <- as.matrix(read.csv(myfile, sep=";"))
>dim(Input)
>
>Input[1:6, ]
>
>Jean
>
>
>
sor of Anthropology
>Texas A&M University
>College Station, TX 77843-4352
>
>
>> -Original Message-
>> From: r-help-boun...@r-project.org [mailto:r-help-bounces@r-
>> project.org] On Behalf Of Irucka Embry
>> Sent: Wednesday, November 28, 2012 7:3
than character matrix
>
>HI,
>Try changing sep="," to sep=";".
>A.K.
>
>
>
>
>- Original Message -
>From: Irucka Embry
>To: jvad...@usgs.gov
>Cc: r-help@r-project.org
>Sent: Wednesday, November 28, 2012 8:35 AM
>Subject: Re: [R]
Hi Jean, I am responding to the last part of your response now.
Thank-you.
Irucka Embry
m[1:6, ] where m is Input
Input <-
as.matrix(read.csv("/home/ie/Documents/TTU/GA_Research/GLUE/R-Project/R_
GLUE_Example/Input_Parameter.csv", header = TRUE, sep =",&qu
another e-mail.
Irucka Embry
Input <-
as.matrix(read.csv("/home/ie/Documents/TTU/GA_Research/GLUE/R-Project/R_
GLUE_Example/Input_Parameter.csv", header = TRUE, sep =",", ))
101x1 character matrix
Input
Time..day..1.2.3.4.5.6.7.8.9.10.11.12.1
nother matrix
results
>
>Hello,
>
>Try removing the square parenthesis from the left hand side,
>
>Vsim <- Vsim[, NSErr > 0.6]
>
>
>Hope this helps,
>
>Rui Barradas
>Em 20-11-2012 04:07, Irucka Embry escreveu:
>> Hi Rui, how are you?
>>
>>
Hi Rui, how are you?
I want to thank you for your assistance again.
I'm sorry, but the code that you provided for me did not work this time.
The code and the warning message are both below:
> NSErr <- t(matrix(NSEr)) # which is a 1x1000 double matrix
> Vsim[] <- Vsim[ , NSErr > 0.6]
Warning me
Hi Arun, thanks for your assistance. That worked as well.
Irucka
<-Original Message->
>From: arun [smartpink...@yahoo.com]
>Sent: 11/19/2012 7:22:09 AM
>To: iruc...@mail2world.com
>Cc: r-help@r-project.org
>Subject: Re: [R] loop to subtract arrays / error
>
>HI,
>May be this helps:
>
>Vo
Hi Rui, thank-you.
That was simple and worked great.
Irucka
<-Original Message->
>From: Rui Barradas [ruipbarra...@sapo.pt]
>Sent: 11/19/2012 4:13:24 AM
>To: iruc...@mail2world.com
>Cc: r-help@r-project.org
>Subject: Re: [R] loop to subtract arrays / error
>
>Hello,
>
>Or simpler, sin
Hi Rui Barradas, how are you?
Thank-you very much. That worked perfectly.
Irucka Embry
<-Original Message->
>From: Rui Barradas [ruipbarra...@sapo.pt]
>Sent: 11/19/2012 4:05:11 AM
>To: iruc...@mail2world.com
>Cc: r-help@r-project.org
>Subject: Re: [R] loop to su
36 matches
Mail list logo
