Displaying 4 results from an estimated 4 matches for "lastyear".
2011 Sep 13
1
implicit data frame reference
If I create an aggregation like this:
aggregate(lastYear[,8:10],list(Stadium=lastYear$STAD),mean)
I'll get a new data frame, which I can order if I assign it like this:
newFrame <- aggregate(lastYear[,8:10],list(Stadium=lastYear$STAD),mean)
newFrame[order(newFrame$TEMP),]
But.. if I just want to do this in one statement, what can I do? If this...
2009 Jul 24
1
adjusting grid on Xaxis ticks
...trying to plot correctly a graph for 2 month now, with no success.I want to put a grid, adjusted on the X axis tickers.
Here is the way I build my X-Axis and my grid:
grid(11, NULL, col="grey40")
axis(2)
# build the tickers on the beginning of each monthticks.at <- seq(ISOdatetime(lastYear, 01, 01, hour=0, min=0, sec=0, tz="GMT"), ISOdatetime(lastYear, 12, 31, hour=0, min=0, sec=0, tz="GMT"), by = "months")
ticks.lab <- format(ticks.at, format = "%b")
Axis(ISOdatetime(lastYear, substr(index(xts1),6,7), substr(index(xts1),9,10), hour=0, min=0...
2009 Jul 31
1
what meaning missing value True /False needed
...used to simulate LR
NbOfSimScenar <- 1000
# Number Monte-Carlo scenarios
GenAlgoIterNb <- 100
# number of iteration for genetic algorithm
#######################################
# Problem size parameters :
#######################################
FirstYear <-2009
# first year of renewal
LastYear <- 2018
# last year of projected renewal
######################################
# Function giving the minimum x (price factor = 1+x ) :
######################################
Xmin <- function(LapseType, ElasticityLeft, WindowLeft, MinLapseRate ,CentralLapseRate)
{
InputDim <- length(Laps...
2010 Aug 02
1
Any way around using only 1 render per action?
...ere
is my controller code.
@households = Household.find(:all, :order => "last_name,
first_name")
@households.each { |@household|
@today = Date.today
@year = @today.year
@thisyear =
Visit.find_all_by_year_and_household_id(Date.today.year,
@household.id)
@lastyear =
Visit.find_all_by_year_and_household_id(Date.today.year-1,
@household.id)
@yearbefore =
Visit.find_all_by_year_and_household_id(Date.today.year-2,
@household.id)
render( :action=>:printone)
}
date=`date +%Y%m%d-%H:%M`
respond_to do |format|
format.pdf { send_data...