I think you are looking for y ~ x + x:factor   E.g.

library(car)
lm(repwt ~ repht + repht:sex, data=Davis)

Coefficients:
(Intercept)        repht   repht:sexM
  -59.30865      0.71412      0.05694

where the third term is the difference in slope between males and females.

lm(repwt ~ repht:sex, data=Davis)

Coefficients:
(Intercept)   repht:sexF   repht:sexM
   -59.3086       0.7141       0.7711

for separately reported slopes.

If you want to constrain the intercept, fit with and without and take the better fit (or look into package nnls, but that would be overkill here).


On Wed, 28 Nov 2007, [EMAIL PROTECTED] wrote:

Hi group,

I have this type of data
x(predictor), y(response), factor (grouping x into many groups, with 6-20
obs/group)

I want to fit a linear regression with one common intercept. 'factor'
should only modify the slopes, not the intercept. The intercept is expected
to be >0.

If I use
y~ x + factor, I get a different intercept for each factor level, but one
slope only

if I use
y~ x * factor, I get the interaction term I want, but the intercept is not
kept constant.
Also, if I constrain teh intercept in the regression model (y~a+x*factor),
I get estimates both for slope and intercept of each factor level.

Robert




----------------------------------------------------------------------------------------------------------------------
NIVAs hovedkontor har flyttet til nye lokaler i CIENS - Forskningssenter
for miljø og samfunn; Gaustadalléen 21, 0349 Oslo. Meld deg på vårt
nyhetsbrev på www.niva.no
______________________________________________
R-help@r-project.org mailing list
https://stat.ethz.ch/mailman/listinfo/r-help
PLEASE do read the posting guide http://www.R-project.org/posting-guide.html
and provide commented, minimal, self-contained, reproducible code.


--
Brian D. Ripley,                  [EMAIL PROTECTED]
Professor of Applied Statistics,  http://www.stats.ox.ac.uk/~ripley/
University of Oxford,             Tel:  +44 1865 272861 (self)
1 South Parks Road,                     +44 1865 272866 (PA)
Oxford OX1 3TG, UK                Fax:  +44 1865 272595
______________________________________________
R-help@r-project.org mailing list
https://stat.ethz.ch/mailman/listinfo/r-help
PLEASE do read the posting guide http://www.R-project.org/posting-guide.html
and provide commented, minimal, self-contained, reproducible code.

Reply via email to