From Thom@@@SOEIRO @end|ng |rom @p-hm@|r  Mon May 11 00:27:01 2020
From: Thom@@@SOEIRO @end|ng |rom @p-hm@|r (SOEIRO Thomas)
Date: Sun, 10 May 2020 22:27:01 +0000
Subject: [Rd] justify hard coded in format.ftable
Message-ID: <8f85a69cd0474adfa6e77495c961fb2a@SCWPR-EXDAG1-6A.aphm.ap-hm.fr>

Dear all,

justify argument is hard coded in format.ftable:

cbind(apply(LABS, 2L, format, justify = "left"),
      apply(DATA, 2L, format, justify = "right"))

It would be useful to have the possibility to modify the argument between c("left", "right", "centre", "none") as in format.default.

The lines could be changed to:

if(length(justify) != 2)
  stop("justify must be length 2")
cbind(apply(LABS, 2L, format, justify = justify[1]),
      apply(DATA, 2L, format, justify = justify[2]))

The argument justify could defaults to c("left", "right") for backward compatibility.

It could then allow:
ftab <- ftable(wool + tension ~ breaks, warpbreaks)
format.ftable(ftab, justify = c("none", "none"))

Best regards,

Thomas



[Rd] justify hard coded in format.ftable
SOEIRO Thomas