# Currently only identity transformation
S4TransIdentity <- scales::trans_new(
"S4identity",
"force",
"force",
breaks = S4BreaksMajor,
minor_breaks = S4BreaksMinor,
format = S4LabelFormat
)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.