Displaying 20 results from an estimated 1200 matches similar to: "Can I stub a method on a belongs_to association:"
2007 Jun 24
6
mocking errors
What is the correct way to mock out the errors on a Rails model?
I''m assuming i need to say
@mock_thing = mock_model(Thing)
@mock_thing_errors = mock("errors")
@mock_thing_errors.should_receive(:full_messages).and_return("An error")
@mock_thing.should_receive(:errors).and_return(@mock_thing_errors)
Just wanted to check the best practice on this kind of thing and how
2008 May 07
1
Assigning to the foreign key on a belongs_to association
I''ve encountered what seems like an odd omission in the behaviour of
belongs_to associations: if you assign to the foreign key attribute,
it doesn''t update the associated object (or mark a previously loaded
one as stale) until you explicitly save or reload it.
Let''s say we have a Company model, which belongs_to :city :
>> torchbox =
2007 May 23
4
content_for
Any ideas how I would go about writing specs for views which make use
of content_for?
I''d like, for example, to be able to specify that ABC view places XYZ
in the sidebar, which I do using content_for(:sidebar).
Am I missing something obvious?
Kyle
2004 Jun 25
3
Termination Provider
I've been looking for a good iax or sip <==> ptsn provider. Someone
with very low cost usa calling and can offer incoming ptsn connections
in most markets. The only decent providers I could find were
iconnecthere and nufone. Has anyone found someone that really stood
out?
Matt Hohman
New Heights Church
http://www.newheights.org
7913 NE 58th Ave. Vancouver, WA 98665
Office:
2003 Nov 10
8
Memory issues..
Hi dear R-listers, I'm trying to fit a 3-level model using lme in R. My
sample size is about 2965 and 3 factors:
year (5 levels), ssize (4 levels), condition (2 levels).
When I issue the following command:
>
lme(var~year*ssize*condition,random=~ssize+condition|subject,data=smp,method
="ML")
I got the following error:
Error in logLik.lmeStructInt(lmeSt, lmePars) :
2012 Apr 10
3
How to get the SS and MS from oneway.test?
Hello everyone:
I'm a new member of this group.
I have a question about "oneway.test".
When I use "anova(lm(....))" to analysis the
ANOVA,
I can get the information about Sum Sq and Mean
Sq.
(The R code and the results are as follows.)
2010 Apr 29
1
How to estimate the residual SD for each sample separately in mixed-effects model?
Dear R-helpers,
I am developing a Mixed-Effects model for a study of immunoassays using
'lme4' library. The study design is as follows: 10 samples were run
using 7 different immunoassays, 3 times each, in duplicates. Data
attached. I have developed the following model:
c.lme <- lmer(Result~SPL + (SPL|Assay/Run) -1, data=data)
This model has excellent predictions - the Rsquared of
2010 Mar 09
3
Help with ANOVA in R
Hi
I am attempting Anova analysis to compare results from four groups
(Samp1-4) which are lists of intensities from the experiment. I am
doing this by first creating a structured list of the data and then
conducting the ANOVA (Script provided below). Im an R beginner so am
not sure if I am using this correctly. Two major questions I have are:
1)
Is using the code (zzz.aov <- aov(Intensity ~
2010 Oct 13
5
Regular expression to find value between brackets
Hi,
this should be an easy one, but I can't figure it out.
I have a vector of tests, with their units between brackets (if they have
units).
eg tests <- c("pH", "Assay (%)", "Impurity A(%)", "content (mg/ml)")
Now I would like to hava a function where I use a test as input, and which
returns the units
like:
f <- function (x) sub("\\)",
2006 Jun 21
1
eliminating a do loop
Using a "by() statement, I am preparing ANOVA's for multiple experiments,
and using simint() to generate confidence intervals.
This works fine.
simint.by.fit <- by(analytes.dfr, list(Assay = analytes.dfr$analyte ),
function(data) (simint(value ~ tx, data = data,type='Tukey' ) ) )
I can separately prepare plots of the confidence intervals, and I can
prepare separate plots
2003 May 12
1
update.lme trouble (PR#2985)
Try this
data(Assay)
as1 <- lme(logDens~sample*dilut, data=Assay,
random=pdBlocked(list(
pdIdent(~1),
pdIdent(~sample-1),
pdIdent(~dilut-1))))
update(as1,random=pdCompSymm(~sample-1))
update(as1,random=pdCompSymm(~sample-1))
update(as1,random=pdCompSymm(~sample-1))
update(as1,random=pdCompSymm(~sample-1))
I'm
2012 Jan 22
1
How to construct a formula
Hi,
I need to construct a formula programaticly, and pass it to a function
such as the linear mixed model lme. The help says it requires "a
two-sided linear formula object describing the fixed-effects part of the
model" but I do not know how to create this formula. I have tried
various things using formula(x, ...), as.formula(object, env =
parent.frame()) and as.Formula(x, ...)
2012 May 23
3
applying cbind (or any function) across all components in a list
#If I have two lists as follows
a1<- array(1:6, dim=c(2,3))
a2<- array(7:12, dim=c(2,3))
l1<- list(a1,a2)
a3<- array(1:4, dim=c(2,2))
a4<- array(5:8, dim=c(2,2))
l2<- list(a3,a4)
#how can I create a new list with the mean across all arrays within the
list, so all components are included? As an example for [[1]];
cbind((l1[[1]][,1]+l2[[1]][,1])/2,
2006 Jan 03
3
Package for multiple membership model?
Hello all:
I am interested in computing what the multilevel modeling literature calls a multiple membership model. More specifically, I am working with a data set involving clients and providers. The clients are the lower-level units who are nested within providers (higher-level). However, this is not nesting in the usual sense, as clients can belong to multple providers, which I understand
2010 Dec 13
1
Multivariate binary response analysis
Greetings ~
I need some assistance determining an appropriate approach to analyzing multivariate binary response data, and how to do it in R.
The setting: Data from an assay, wherein 6-hours-post-fertilization zebrafish embryos (n=20, say) are exposed in a vial to a chemical (replicated 3 times, say), and 5 days later observed for the presence/absence (1/0) of defects in several organ systems
2008 Dec 07
2
concordance correlation coefficient using R
Hi.
I have data which i would want to assess the degree of agreement
between two assays, e.g., to evaluate reproducibility or for
inter-rater reliability. I have used the Pearson product-moment
correlation coefficient. It looks good ranginging between 0.90 to
0.998. Though this looks good. I am told the Concordance correlation
coefficient will give a better picture of how reproducible the assay
2017 Aug 08
1
Bug?
Hello,
In my code I found something that looks like an anomaly, I found a reproducible example in which I am just trying to compare each row in a data frame against the first row:
a<-data.frame(row=c("B","C","B"),column=c(2,2,10),assay=c("Assay1","Assay1","Assay1"),plate=c(1,1,1),stringsAsFactors=FALSE)
apply(a[1:2,],1,function(x) {
2004 Mar 15
2
imputation of sub-threshold values
Is there a good way in R to impute values which exist,
but are less than the detection level for an assay?
Thanks,
Jonathan Williams
OPTIMA
Radcliffe Infirmary
Woodstock Road
OXFORD OX2 6HE
Tel +1865 (2)24356
2004 Jan 14
2
Generalized least squares using "gnls" function
Hi:
I have data from an assay in the form of two vectors, one is response
and the other is a predictor. When I attempt to fit a 5 parameter
logistic model with "nls", I get converged parameter estimates. I also
get the same answers with "gnls" without specifying the "weights"
argument.
However, when I attempt to use the "gnls" function and try to