[R] Only one label from axis() is shown

[Bert Gunter]

Oh, and for your last example, what you actually do is plot 25
separate axes with one label each, one on top of the other.
Again, correction requested if this is wrong.

-- Bert
"An educated person is one who can entertain new ideas, entertain
others, and entertain herself."


On Wed, May 28, 2025 at 2:28 PM Marc Girondot via R-help
<r-help using r-project.org> wrote:
>
> Can someone explain me why in the second example, only one label is shown ?
>
> Thanks a lot
>
> Marc
>
> atT <- structure(c(1672520400, 1675198800, 1677618000, 1680296400,
> 1682888400,
>              1685566800, 1688158800, 1690837200, 1693515600, 1696107600,
> 1698786000,
>              1701378000, 1704056400, 1706734800, 1709240400, 1711918800,
> 1714510800,
>              1717189200, 1719781200, 1722459600, 1725138000, 1727730000,
> 1730408400,
>              1733000400, 1735678800), class = c("POSIXct", "POSIXt"),
> tzone = "Asia/Riyadh")
>
> # Work as expected
> plot(x = atT, y=rep(1, length(atT)), xaxt="n")
> axis(side = 1, at=atT, labels = as.character(seq_along(atT)))
>
> # Only first label is shown
> plot(x = atT, y=rep(1, length(atT)), xaxt="n")
> axis(1, at=atT, label=c("Jan-2023", "", "", "", "", "", "Jul-2023", "",
> "", "", "", "",
>                                      "Jan-2024", "", "", "", "", "",
> "Jul-2024", "", "", "", "", "",
>                                      "Jan-2025"), cex.axis=0.8)
>
> # All labels are shown... but not elegant !
> plot(x = atT, y=rep(1, length(atT)), xaxt="n")
> for (i in seq_along(atT)) {
>    axis(1, at=atT[i], label=c("Jan-2023", "", "", "", "", "",
> "Jul-2023", "", "", "", "", "",
>                            "Jan-2024", "", "", "", "", "", "Jul-2024",
> "", "", "", "", "",
>                            "Jan-2025")[i], cex.axis=0.8)
>
> }
>
>  > R.version
>                 _
> platform       aarch64-apple-darwin20
> arch           aarch64
> os             darwin20
> system         aarch64, darwin20
> status         Patched
> major          4
> minor          5.0
> year           2025
> month          05
> day            16
> svn rev        88216
> language       R
> version.string R version 4.5.0 Patched (2025-05-16 r88216)
> nickname       How About a Twenty-Six
>
> ------------------------------------------------------------------------
> *Marc Girondot, Pr*
>
> Laboratoire Ecologie, Société, Evolution
> Equipe de Processus Ecologiques et Pressions Anthropiques
> CNRS, AgroParisTech et Université Paris-Saclay, UMR 8079
> 91190 Gif-sur-Yvette, France
>
> Tel: +33 (0)1.69.15.72.30 Mobile: +33 (0)6.20.18.22.16
> e-mail: marc.girondot using universite-paris-saclay.fr
> marc.girondot using gmail.com
>
> Web: http://hebergement.universite-paris-saclay.fr/marcgirondot/
>
>         [[alternative HTML version deleted]]
>
> ______________________________________________
> R-help using r-project.org mailing list -- To UNSUBSCRIBE and more, see
> https://stat.ethz.ch/mailman/listinfo/r-help
> PLEASE do read the posting guide https://www.R-project.org/posting-guide.html
> and provide commented, minimal, self-contained, reproducible code.