search for: nday

...(the time index) of the 3D array of precipitation called prec. That is, I'd like to get a 3D array called prec*_daily* that has dimension prec*_daily*[21, 3, 4], where 21 is the number of days and the value in say prec*_daily*[1,x,y] is equal to prec[1,x,y] + prec[2,x,y] + ... + prec[24,x,y] ndays <- 21 base_time <- as.character('2001-12-31T23:00:00Z') hrs_since_base <- 1 # adding an extra second to the end b/c I'm paranoid about the midnight time stamp not being explicit beg_time <- as.POSIXct(base_time, format = "%Y-%m-%dT%H:%M:%SZ") + (hrs_since_base *...

...of precipitation called prec. That is, I'd like to > get a 3D array called prec*_daily* that has dimension prec*_daily*[21, 3, > 4], > where 21 is the number of days and the value in say prec*_daily*[1,x,y] is > equal to prec[1,x,y] + prec[2,x,y] + ... + prec[24,x,y] > > > ndays <- 21 > base_time <- as.character('2001-12-31T23:00:00Z') > hrs_since_base <- 1 > > # adding an extra second to the end b/c I'm paranoid about the midnight > time stamp not being explicit > beg_time <- as.POSIXct(base_time, format = "%Y-%m-%dT%H:%M:%S...

...s, is there a way to do within a fb:editor? if I do: <% facebook_form_for(:task, at task,:url => create_task_path) do |f| %> Assign Task To: <%= fb_friend_selector %> <%=f.text_field :ttype, :label=> "Title"%> <%=text_field_tag :newrnumdays, ndays, :label => "# Days"%> <%=f.buttons "Add" %> <% end %> the text_field seems to be placed nicely in the editor and formatted accordingly but the friend selector & the text_field_tag are not placed inside the editor display table and are just dumped...

...llingPointID == sp,] dmnd <- tsrSUB[is.na(tsrSUB$cDeviceClass),] if(nrow(dmnd) != 1) warning(paste("cSpillingPointID", sp, "has more than one demand time Series. Used first.")) tsrValCount <- getTimeSeries(chn, tsrSUB[!is.na(tsrSUB$cDeviceClass),]$cTimeSeriesID, nDaysBack = 366*nyears) tsrValDmnd <- getTimeSeries(chn, dmnd$cTimeSeriesID[1], nDaysBack = 366*nyears) sequence <- timeSequence(from = format(start(tsrValDmnd), '%Y-%m-%d'), to = format(end(tsrValDmnd), '%Y-%m-%d'), by = 'day') if(format(start(tsrValDmnd), '%H&...

...as.numeric(table$mes) table$day<-as.numeric(table$day) for (anyo in 2000:2010){ table2=subset(table,table$year==anyo) ndias=length(table2$year) if(ndias<365){ for (ms in 1:12){ table2=subset(table2,table2$mes==ms) ndays=length(table2$year) a<-(anyo==2000 | anyo==2004 | anyo==2008) & (ndays<daysanyoBIS[ms]) if(a==TRUE){ aa<-1:daysanyoBIS[ms]...

Hello I'm a new in R I have a large data.frame "s" (this is actualy just a table in mysql) : > names(s) [1] "symbols", "day", "value" I need to convert it to simple matrix. I have define this matrix like this: > data.matrix <- matrix(nrow=nDays, ncol=nSymbols, dimnames=list(days, symbols)) then i just copy values to the matrix using for() loop, but it seems to take very long time. Is is a more fast way to do it in R? I know, what i can just gyve s$value as source data to the matrix, but problem is, what for some symbols couple days coul...

What does this warning mean precisely? Is there any reason to care about it? Can I Avoid it by another way of programming? Thank you in advance.

Carlos A. P. Cunha via samba wrote: > For me, is "magic line" > > find $DEST -depth -mtime +$DAYS -print -delete ---- I'm guessing you probably want 'ctime' there. If you use mtime, then it will be deleted "ndays" after the last modification date on the file -- NOT the time the file was moved into the recycle bin. If you use ctime - that appears to update when the file is moved into a different directory (the recycle bin) -- allowing things to expire some number of days after it is "recycled...

Hi everyone, I have been trying to compute numbers of days between two dates as follows: > x <- c("1jan1960", "2jan1960", "31mar1960", "30jul1960") > z <- format(x, "%d%b%Y") > ex <- c("1jan1961", "15jan1960", "21mar1975", "10jul1981") > ez <- format(ex, "%d%b%Y") > ez-z

Dear R-help I am using R version 2.6.2. I am trying to subtract specific values from a larger data frame. I feel this should be straightforward, but I am struggling. I have a dataframe "Bk" as follows: DateTime cumPrecip 01/01/2008 00:00 348 01/01/2008 01:00 348 01/01/2008 02:00 348 01/01/2008 03:00 347 01/01/2008 04:00 348 01/01/2008 05:00 348 01/01/2008 06:00 349

...; To: John Putz <johnputz3655@yahoo.com> > Cc: r-sig-finance@stat.math.ethz.ch > Sent: Friday, December 7, 2007 9:26:29 PM > Subject: Re: holidayNYSE missing some > > > John Putz wrote: > > The correct behavior is to shift the holiday to Friday (from Sat) or > to Monday (from Sun). I'm not actually using this for NYSE holidays > but for power industry holidays and made a version to handle those > changes as well as some other idiosyncracies. Thanks for the > suggestion though. > > > > Message: 5 > > Date: Thu, 6 Sep 2007 16:51:4...

...o the source file having been deleted, rename the local file "originalfilename__RSYNC_YYYYMMDD". 2. Whenever we are asked to delete a file (in delete_one), check the filename. If it is in the form above, check to see if the required amount of time has elapsed (via a --delete-delay=NDAYS argument). Delete as appropriate. If the file isn't in the correct form, the file only became obsolete just now; rename the file with the current date. 3. These modified filenames would be exposed to the user. (Yes, a big ugly.) An alternative strategy which would preserve the filename...

I have a vector of dates. I wish to find the month end date for each. Any suggestions? e.g. For 12/15/05, I want 12/31/05, For 10/15/1995, I want 10/31/1995, etc __________________________________________________ [[alternative HTML version deleted]]

Dear , My current samba versiion is samba-4.4.4 and running on centos 7.2 My current samba have recycle enable . I want to age limit for recycle bin . Please kindly let me know any parameter for recycle bin age limit . Best Regards, Si Thu.

..."){ stop("holidays must be a function") } if(start > end){ stop("start date must not be greater than end date.") } y1 <- as.POSIXlt(start)$year + 1900 y2 <- as.POSIXlt(end)$year + 1900 seqs <- timeSequence(from = start, to = end, by = "day") ndays <- length(seqs) dts <- NULL temp <- NULL if( y1 == y2){ temp <- window(holidays(y1), start = start, end = end) dts <- seqs[isBizday(seqs,temp)] }else{ temp <- holidays(y1) for(k in seq(from = y1+1, to = y2)){ temp <- c(temp,holidays(k)) }...

..." not a specific date. The way I do it now is awkward. Would love to find a way to do this easier to generate a new object just containing the days I want. --------------------------------------- dayEnds <- endpoints(dataset, on="days") datasetEnd <- max(dayEnds) for( d in 1:ndays(dataset)){ day <- dataset[ (dayEnds[d]+1):dayEnds[d+1], ] daysToEnd <- round(as.numeric( index(dataset[datasetEnd]) - index(tail(day, n=1)) , unit="days" )) if(daysToEnd > 30|| daysToEnd < 10){ next; } # Will only get here if the days until the end are between 10...

Hi all, I have a question regarding the enforced change of passwords in Samba 3.0.28 (coming with Ubuntu Hardy) in connection with a LDAP backend. In particular, I am looking for a documentation how the fields sambaMinPwdAge, sambaMaxPwdAge (from sambaDomain), sambaPwdCanChange and sambaPwdMustChange (from sambaSAMAccount) interact. I would like to have the following: - when a new

...ba LDAP entries for Password Change Hi... sorry for my bad english. > - when a new account is created, the user immediately must change the > password when [s]he first logs in; > - after that, the password shall expire after x days. sambaMaxPwdAge = number of seconds (60 x 60 x 24 x nDays) sambaPwdLastSet = set to '0' at create the account. good luck Jorge C. On Tue, 16 Sep 2008 10:27:53 -0400, Albrecht Dre? <albrecht.dress@lios-tech.com> wrote: > Hi all, > > I have a question regarding the enforced change of passwords in Samba > 3.0.28 (coming wit...

...on I want to apply is "fitdistr(x,"exponential")". Would I just replace "quantile(x$DATA, names=FALSE)" by "fitdistr(x,"exponential")"? Finally, suppose the query I need to run is more complex, such as: SELECT group_id,YEAR(my_date),WEEK(my_date),ndays FROM myTable ORDER BY group_id,YEAR(my_date),WEEK(my_date); Can dbApply handle applying "fitdistr(x,"exponential")" to each group of values defined by "group_id,YEAR(my_date),WEEK(my_date)"? If so, how would I change the call to dbsendQuery, and how would I insert t...

...U public = no allow hosts = 136.142.198. [homes] guest ok = no read only = no create mask = 0700 directory mask = 0700 oplocks = false locking = no [mhpcd] comment = MHPCD Documents browseable = yes allow hosts = 136.142.198. public = no guest only = no write list = fail tml nadine sonyaf nancys2 nday marie gale cindy carriet kare ns eva willford path = /usr/local/export hide dot files = yes follow symlinks = yes wide links = no create mask = 774 directory mask = 775 force group = office [documents] comment = Full Online Documentation browseable = yes allow hosts = 136.142.198. public = yes gue...