Displaying 20 results from an estimated 10000 matches similar to: "R-gui and chinese character"
2002 Jul 16
2
r-square for non-linear regression
We have extracted parameters from physiological measurements by fitting
SSlogis-like curves with nlsList and nlme.
We presented residuals plot in a paper, but a referee argues that these
cannot be included (too technical), and r-square values should be given
instead to compare the goodness of fit with those of other authors.
I remember that 30 years ago in my stat 101, I learned that r-square is
2001 Feb 27
2
Remove columns by name data[-c("subj","drug")]
Is there an easy way to remove data frame columns
by name instead of by index? The following gives
the idea
remove<-c("subj","drug")
data[-remove]
I found a solution with a few evals and substitutes,
similar to that used in reshapeLong, but there must
be an easier way out.
Dieter
---------------------------------------
Dr. Dieter Menne
Biomed Software
72074 T?bingen
Tel
2008 Jan 02
2
Windows Shell Command under Vista
Dear R2008,
In Windows 2000, I used the following shell extension to allow right-click
rgui start in a directory (assuming rgui.exe is on the path:
-----
REGEDIT4
[HKEY_CLASSES_ROOT\Directory\shell\Run R]
[HKEY_CLASSES_ROOT\Directory\shell\Run R\command]
@="Rgui.exe --no-restore --no-save --internet2"
----
I switched to Vista this year. For reasons I don't understand, I have
2008 Dec 22
3
Convert ASCII string to Decimal in R (vice versa) was: Hex
Hi Dieter,
Sorry my mistake. I wanted to convert them
into Decimal (not Hexadecimal).
Given this string, the desired answer follows:
> ascii_str <- "ORQ>IK"
79 82 81 62 73 75
> ascii_str2 <- "FDC"
70 68 67
- Gundala Viswanath
Jakarta - Indonesia
On Mon, Dec 22, 2008 at 5:49 PM, Dieter Menne
<dieter.menne at menne-biomed.de> wrote:
> Gundala
2001 Mar 01
2
Individual rename of list items
I am confused by the logic of renaming:
# Rename individual list items?
Empl<-list(employee="Anna",spouse="Fred")
names(Empl)<-c("empl","spo")
names(Empl)
#[1] "empl" "spo"
# worked like a charm... but
names(Empl[1])<-"newempl"
# no error message, yet ....
names(Empl)
#[1] "empl" "spo"
#
2006 Mar 25
7
Regexp subexpression
I can't get the PERL subexpression translated to R. Following, for example,
B. Ripley's
http://finzi.psych.upenn.edu/R/Rhelp02a/archive/58984.html
I am using sub, but it looks like an ugly substitute. Assume I want to
extract the first alpha part and the first numeric part, but only if they
are in sequence.
Do I really have to use the sub twice, first extracting the first variable,
then
2001 Feb 04
1
quinModel S != R
Dear friends of nlme,
Running quinModel (Pinheiro/Bates page 380) on R (current release, windows)
gives:
Nonlinear mixed-effects model fit by maximum likelihood
Model: conc ~ quinModel(Subject, time, conc, dose, interval, lV, lKa,
lCl)
Data: Quinidine
Log-likelihood: -497
Fixed: lV + lKa + lCl ~ 1
lV lKa lCl
5.382 -0.273 2.470
Random effects:
Formula: list(lV ~ 1, lCl ~ 1)
2011 Jul 28
2
not working yet: Re: lattice overlay
Hi Dieter and R community:
I tried both of these three versions with ylim as suggested, none work: I
am getting only single (pch = 16) not overlayed (pch =3) everytime.
*vs 1*
require(lattice)
xyplot(Sepal.Length ~ Sepal.Width | Species , data= iris,
panel= function(x, y, subscripts) {
panel.xyplot(x, y, pch=16, col = "green4", ylim = c(0, 10))
panel.lmline(x, y, lty=4, col =
2002 Jun 20
1
Psychometric curves, two altnerative force choice, glm, and budbworms
Dear R-Listers,
to measure the psychometric curve of pitch discrimination, one sequentially
presents two tones of slightly different pitch to an observer (animal will
do), and asks "which is higher". The pschometric curve is the fraction of
correct responses plotted against the pitch difference. It passes through
50% (pure guessing) at zero and normally approaches 100% at large
2001 Feb 23
1
as.formula and lme ( Fixed effects: Error in as.vector(x, "list") : cannot coerce to vector)
Using a formula converted with as.formula with lme leads
to an error message. Same works ok with lm, and with
lme and a fixed formula.
# demonstrates problems with lme and as.formula
demo<-data.frame(x=1:20,y=(1:20)+rnorm(20),subj=as.factor(rep(1:2,10)))
demo.lm1<-lme(y~x,data=demo,random=~1|subj)
print(summary(demo.lm1))
newframe<-data.frame(x=1:5,subj=rep(1,5))
2009 Sep 30
5
Condition to factor (easy to remember)
Dear List,
creating factors in a given non-default orders is notoriously difficult to
explain in a course. Students love the ifelse construct given below most,
but I remember some comment from Martin M?chler (?) that ifelse should be
banned from courses.
Any better idea? Not necessarily short, easy to remember is important.
Dieter
data = c(1,7,10,50,70)
levs =
2009 Apr 20
1
Buglet in plotCI
Dieter Menne wrote:
> Hi, Jim,
>
> there is a typo at the bottom of plotCI: there is an y.to.in which should be
> x.to.in.
>
> See list for an example.
>
> http://article.gmane.org/gmane.comp.lang.r.general/147103
>
> Should be:
> nz <- (abs(ui - pmin(x + gap, ui)) * x.to.in) > 0.001
>
> Dieter
>
>
Hi Dieter,
Thanks for the fix. I have
2002 May 27
1
nlme cross-over and fixed nested
I have problem getting the concept of a nested fixed variable into the nlme
scheme. I fear the question is very stupid. In the past I had asked this
before, and never got a reply (in other cases, the response was within
hours). I also checked the S-list, where several similar enquiries of other
people are orphaned.
We have a cross-over design, where patient are treated two weeks with
placebo,
2007 Oct 24
1
Package Build fails: make ./help: no such file or directory
Dear List,
After having installed R 2.6.0/Windows 2000, my trusted command script to build
and install my package fails with an error message I do not understand. I have
installed a fresh copy of Rtools, and made sure that these are the first on the
path.
For testing, I am using a package version from an older backup where I am sure
that everything else was ok.
2004 Jun 11
3
Modifying Code in .rda based packages (e.g. lme4)
Dear List,
assume I want to make a minor local change in a package that is supplied as
.rda. For example, I want to get rid of the non-verbose-protected
"Iteration" message in GLMM/lme4.
Probably I have to load / change / save the package, but could someone help
me to get the syntax right?
Dieter Menne
2005 Apr 06
2
par(mfcol=2, mfrow=3) equivalent for trellis
Dear friends of lattice,
I know how to position trellis plots with print(...,split,more=T) or
(...position).
Sometimes I wish I had something like the old "par(mfcol=2, mfrow=3)"
mechanism, where the next free viewport is automatically chosen. I tried
fiddling with grid-viewports, but could not find an easy solution.
Did I miss something?
Dieter Menne
2004 May 28
1
Pr(>|z|) in lme4
Dear List,
I am struggling understanding S4 classes. For example, when GLMM
summary(glmmML( whatever))
outputs the following line:
Estimate Std. Error DF z value Pr(>|z|)
(Intercept) 0.856 0.319 45 2.68 0.0073
How do I access the Pr column?
Dieter
2001 Oct 07
1
Bug in Deriv? (PR#1119)
deriv seems to have problems with a minus-sign before a bracket.
Below are four examples of the same function, the top one
is wrong, all others are correct (hopefully).
Rest of expression not shown, it is the same for all versions.
_
platform i386-pc-mingw32
arch x86
os Win32
system x86, Win32
status
major 1
minor 3.0
year 2001
month 06
day 22
language R
2006 Jul 18
2
Sweave and multipage lattice
Dear R-Listeners,
as the Sweave faq says:
http://www.ci.tuwien.ac.at/~leisch/Sweave/FAQ.html
creating several figures from one figure chunk does not work, and for
standard graphics, a workaround is given. Now I have a multipage trellis
plot with an a-priori unknown number of pages, and I don't see an elegant
way of dividing it up into multiple pdf-files.
I noted there is a "page"
2010 Aug 27
3
How to plot an expression-label with variable text
Disclaimer: I have read plotmath, but maybe it's too late today:
How do I get the two labels to be the same:
plot.new()
lab =expression(paste("Estimated ", t[50]," from tgv"))
text(0.5,0.5,lab)
# Should look the same as above. I could not get the substitute right:
what = "tgv"
lab =expression(paste("Estimated ", t[50]," from ",what))