Displaying 6 results from an estimated 6 matches for "aframe".
Did you mean:
frame
2010 Feb 09
1
"1 observation deleted due to missingness" from summary() on the result of aov()
...1, i_c+1)
}
}
}
}
set.seed(0)
Y=matrix(nr=a*b*c*n,nc=1)
for(i in 1:(a*b*c)) {
for(i_n in 1:n-1) {
fa=X[i,'A']
fb=X[i,'B']
fc=X[i,'C']
#Y[(i-1)*n+i_n,1]= fa +fb +fc +fa*fb +fa*fc +fb*fc +fa*fb*fc + rnorm(1)
Y[(i-1)*n+i_n,1]= rnorm(1)
}
}
aframe = data.frame(
A=as.factor(X[,'A'])
, B=as.factor(X[,'B'])
, C=as.factor(X[,'C'])
, Y)
afit=aov(Y ~ A * B * C, aframe)
summary(afit)
2009 Nov 22
1
Why F value and Pr are not show in summary() of an aov() result?
...}
>
> Y=matrix(nr=a*b*c*d*e,nc=1)
> for(i in 1:(a*b*c*d*e)) {
+ fa=X[i,'A']
+ fb=X[i,'B']
+ fc=X[i,'C']
+ fd=X[i,'D']
+ fe=X[i,'E']
+
+ Y[i,1]= fa +fb +fc +fe +fa*fb +fa*fc +fb*fc +fa*fe +fc*fe
+fa*fb*fc +fa*fc*fe + rnorm(1)
+ }
>
> aframe = data.frame(
+ A=as.factor(X[,'A'])
+ , B=as.factor(X[,'B'])
+ , C=as.factor(X[,'C'])
+ , D=as.factor(X[,'D'])
+ , E=as.factor(X[,'E'])
+ ,Y)
>
> afit=aov(Y ~ A * B * C * D * E, aframe)
>
> summary(afit)
Df S...
2010 Feb 03
0
contrast package tutorial
...o use it.
I made the following simpler example (contrast between '3' and '4').
Could somebody let me know what is the correct way to compute the
contrast in the following example?
library(contrast)
a=3
n=4
A = as.vector(sapply(1:a,function(x){rep(x,n)}))
Y = A + rnorm(a*n)
aframe = data.frame(Y=Y, A=as.factor(A))
aframe
afit=aov(Y ~ A - 1, aframe)
contrast(afit, list=(A='3'), list=(A='4'))
2010 Jun 17
3
R user interface
Hi R,
I have a an excel file with a lot of data. I need to create an user
interface in R, which has one single screen. It needs to contain a right
pane containing the click buttons for different countries (say). If the
user clicks a country, then a chart needs to be created for that
country, taking the data from Excel. Is this possible and which package
helps me in doing this? Many thanks in
2012 Apr 24
0
help with GUI interface
...label="shapeit"),
aNotebookPage("file",
separatorItem(),
"fill","sep",
label="file",
)
),
aContainer("assign.to",
aFrame("output", label="Preview")
),
horizontal=TRUE))
dlg$read_file <- function(., file.type, output, assign.to, ...) {
if(file.type != "") {
out <- try(do.call(sprintf("read.%s",file.type), list(...)),
sile...
2008 May 28
1
[Bug 15962] New: Crash with flashblock
...:1606
#8 0x00000031c3dedb6b in nsObjectFrame::Instantiate (this=<value optimized
out>,
aMimeType=<value optimized out>, aURI=<value optimized out>) at
nsObjectFrame.cpp:1670
#9 0x00000031c3efd29b in nsObjectLoadingContent::Instantiate (this=<value
optimized out>,
aFrame=<value optimized out>, aMIMEType=<value optimized out>, aURI=<value
optimized out>)
at nsObjectLoadingContent.cpp:1681
#10 0x00000031c3efffd0 in nsAsyncInstantiateEvent::Run (this=<value optimized
out>)
at nsObjectLoadingContent.cpp:147
#11 0x00000031c4416a9e in nsTh...