[R] Coefficient of Partial Determination

AbouEl-Makarim Aboueissa abouelmakarim1962 at gmail.com
Wed Mar 1 18:57:23 CET 2017


Dear All:

Can the *Coefficient of Partial Determination* in multiple linear
regression be computed in R? If so, could you please let me know how?


fullmodel <- lm(Price ~ Size + Lotsize + Bedrooms + Bathrooms)


*I found this in the internet, but I could find the package "rms"*

*library(rms)  # will also load Hmisc*

*fit <- ols(y ~ x1 + x2, data=bf.dat) *

*plt <- plot(anova(fit), what='partial R2')*

*plt*



Here is part of the data as an example:
---------------------------------------------------

 Taxes Bedrooms Bathrooms   Price Size Lotsize
   296        3         3  795000 2371    5850
   242        4         3  399000 2818    4000
   242        4         3  545000 3032    3060
   222        4         4  909000 3540    6650
   222        3         1  109900 1249    6360
   222        3         3  324900 1800    4160
   311        4         2  192900 1603    3880
   311        3         2  215000 1450    4160
   311        4         3  999000 3360    4800
   311        3         2  319000 1323    5500
   311        3         2  350000 1750    7200
   311        3         2  249000 1400    3000
   311        2         2  299000 1257    1700
   307        3         2  235900 1400    2880
   307        3         2  348000 1600    3600
   307        4         3  314000 1794    3185
   307        4         2  399000 1850    3300
   307        3         3  599000 2950    5200
   307        3         2  299000 1719    3450
   307        3         3  425000 1472    3986
   307        4         3 1100000 4168    4785
   307        3         3 1500000 3880    4510
   307        2         1  110000 1000    4000
   307        3         2  200000 1139    3934
   307        3         1  134900 1080    4960
   307        4         3  250000 2000    3000
   307        3         4  950000 1920    3800
   307        4         2  239950 1348    4960
   307        3         2  170000 1280    3000
   307        3         2  285000 2400    4500
   307        3         3  279000 1700    3500
   307        3         2  219000 1600    3500
   307        3         2  155000 1050    4000
   307        3         2  389000 1415    4500
   307        3         1  340000 1110    6360
   279        2         1   95000  797    4500
   279        2         2  140000 1100    4032
   279        3         3 1100000 2602    5170
   279        4         3  360000 2351    5400
   252        3         3  415000 1350    3150
   252        4         2  250000 1206    3745
   233        3         3  559000 2628    4520
   233        3         3  525000 2365    4640
   233        3         3  779000 2990    8580
   233        3         2  595000 1750    2000
   233        4         5 1150000 5500    2160
   233        3         2  550000 1852    3040
   233        3         2  500000 2100    3090
   233        4         3  279000 2580    4960
   233        4         2  375000 1963    3350
   243        3         3  330000 1900    5300
   243        3         3  199000 1450    4100
   243        2         2  165000 1000    9166
   243        4         3 1399000 6500    4040
   469        3         2  255000 1218    3630
   226        2         2  325000  893    3620



Thank you very much for your help and support

abou
______________________
AbouEl-Makarim Aboueissa, PhD
University of Southern Maine
Department of Mathematics and Statistics

	[[alternative HTML version deleted]]



More information about the R-help mailing list