RT

BAKER

 'Hello'new_theme <- theme_grey() %+replace% theme(legend.key = element_rect(colour = "red"))
new_theme$legend.key
#> List of 5
#>  $ fill         : NULL
#>  $ colour       : chr "red"
#>  $ size         : NULL
#>  $ linetype     : NULL
#>  $ inherit.blank: logi FALSE
#>  - attr(*, "class")= chr [1:2] "element_rect" "element" >     code   markdown_strict   This is a block quote.
>
> > A block quote within a block quote.
    
          (.)     :: f+d = f<-/4/x[c(5,7)]
  ...     (.)                     :: (b->c) -> (a->b) -> (a->c)
          f . g                   = \ x -> f (g x)
          g<-5"divider"(g,a)
           do putStr "x: x<-10">a<-"y">a . f<-c(1,2,3,4,5)
      l <- getLine
      return (words l)
      data S = S1 { x :: Int } | S2 { x :: Int }   -- OK
   data T = T1 { y :: Int } | T2 { y :: Bool }  -- BAD
This text is blue
---
title: "Habits"
output:
  html_document:
    df_print: paged
---
This text is blue
Share
0