[R] question on table format

Norbert NEUWIRTH norbertneuwirth at gmx.at
Mon Mar 19 13:20:57 CET 2007


hi everybody,

i am hanging in a problem that should be solved quickly, but, in fact, i do not get further: building up a SUR/SES-system myself, where the regressions are finally used to be poisson and/or negative-binomial type, i want to generate a simple table, where i can quickly see the coefficients and their markers  for significance.

so i constructed this "final.table" (code & outout below). as the  markers for significance are character-type, the content of each cell in the whole table appears as character with quotation marks.these quotations marks should be suppressed. how can i handle this?

thank you in advance


norbert

---------------------------
code:

final.table3 <- as.matrix (cbind(
                      round(coef.sur5.lm[,1],4),sigc.sur5.lm[,1],
                      round(coef.sur5.lm[,2],4),sigc.sur5.lm[,2],
                      round(coef.sur5.lm[,3],4),sigc.sur5.lm[,3],
                      round(coef.sur5.lm[,4],4),sigc.sur5.lm[,4],
                      round(coef.sur5.lm[,5],4),sigc.sur5.lm[,5]
                  ))
colnames(final.table3) <- c("MW","sig.",
                            "HP","sig.",
                            "CC","sig.",
                            "AL","sig.",
                            "RC","sig.")

---------------------------
output:

              MW        sig.  HP        sig.  CC        sig.  AL        sig.  RC        sig.
(Intercept) "6.7757"  "***" "-2.2851" "***" "-0.067"  ""    "8.517"   "***" "11.0767" "***"
FEMALE      "-1.6267" "***" "2.4045"  "***" "0.2892"  "***" "-1.0887" "***" "0.0236"  ""
AGE         "-0.0324" "."   "0.1923"  "***" "0.0158"  "***" "-0.0984" "***" "-0.0778" "***"
I(AGE^2)    "1e-04"   ""    "-0.0019" "***" "-2e-04"  "***" "0.0011"  "***" "0.001"   "***"
C2.H        "-0.2589" "*"   "0.2051"  "**"  "0.5289"  "***" "-0.4537" "***" "-0.0211" ""
C2_3.H      "-0.4278" "**"  "0.118"   ""    "0.4837"  "***" "-0.1301" ""    "-0.0422" ""
...		...		...		...		...		...
-- 
-------------------------------
Mag. Norbert NEUWIRTH

Roubiczekgasse 2/23
A-1100  WIEN
mob: +43 699 1835 0704



More information about the R-help mailing list