测试rmarkdown输出页面

r
作者

zsc

发布日期

2019年5月11日

Show the code
t(iris[1:30,])
#>              1        2        3        4        5        6        7        8        9        10       11       12       13       14       15       16       17       18       19       20       21       22       23       24       25       26       27       28       29       30      
#> Sepal.Length "5.1"    "4.9"    "4.7"    "4.6"    "5.0"    "5.4"    "4.6"    "5.0"    "4.4"    "4.9"    "5.4"    "4.8"    "4.8"    "4.3"    "5.8"    "5.7"    "5.4"    "5.1"    "5.7"    "5.1"    "5.4"    "5.1"    "4.6"    "5.1"    "4.8"    "5.0"    "5.0"    "5.2"    "5.2"    "4.7"   
#> Sepal.Width  "3.5"    "3.0"    "3.2"    "3.1"    "3.6"    "3.9"    "3.4"    "3.4"    "2.9"    "3.1"    "3.7"    "3.4"    "3.0"    "3.0"    "4.0"    "4.4"    "3.9"    "3.5"    "3.8"    "3.8"    "3.4"    "3.7"    "3.6"    "3.3"    "3.4"    "3.0"    "3.4"    "3.5"    "3.4"    "3.2"   
#> Petal.Length "1.4"    "1.4"    "1.3"    "1.5"    "1.4"    "1.7"    "1.4"    "1.5"    "1.4"    "1.5"    "1.5"    "1.6"    "1.4"    "1.1"    "1.2"    "1.5"    "1.3"    "1.4"    "1.7"    "1.5"    "1.7"    "1.5"    "1.0"    "1.7"    "1.9"    "1.6"    "1.6"    "1.5"    "1.4"    "1.6"   
#> Petal.Width  "0.2"    "0.2"    "0.2"    "0.2"    "0.2"    "0.4"    "0.3"    "0.2"    "0.2"    "0.1"    "0.2"    "0.2"    "0.1"    "0.1"    "0.2"    "0.4"    "0.4"    "0.3"    "0.3"    "0.3"    "0.2"    "0.4"    "0.2"    "0.5"    "0.2"    "0.2"    "0.4"    "0.2"    "0.2"    "0.2"   
#> Species      "setosa" "setosa" "setosa" "setosa" "setosa" "setosa" "setosa" "setosa" "setosa" "setosa" "setosa" "setosa" "setosa" "setosa" "setosa" "setosa" "setosa" "setosa" "setosa" "setosa" "setosa" "setosa" "setosa" "setosa" "setosa" "setosa" "setosa" "setosa" "setosa" "setosa"

这是行内公式\(a^2+b^2+\sqrt{c}\),这是行间公式 \[x^2+y^2= z^2\] ## 动态图

Show the code
library(ggplot2)
library(plotly)
p <- ggplot(data = diamonds, aes(x = cut, fill = clarity)) +
            geom_bar(position = "dodge")
ggplotly(p)
Show the code
library(rbokeh)
figure() %>%
  ly_points(Sepal.Length, Sepal.Width, data = iris,
    color = Species, glyph = Species,
    hover = list(Sepal.Length, Sepal.Width))
Show the code
library(dygraphs)
dygraph(nhtemp, main = "New Haven Temperatures") %>% 
  dyRangeSelector(dateWindow = c("1920-01-01", "1960-01-01"))
Show the code
summary(cars)
#>      speed           dist       
#>  Min.   : 4.0   Min.   :  2.00  
#>  1st Qu.:12.0   1st Qu.: 26.00  
#>  Median :15.0   Median : 36.00  
#>  Mean   :15.4   Mean   : 42.98  
#>  3rd Qu.:19.0   3rd Qu.: 56.00  
#>  Max.   :25.0   Max.   :120.00
Show the code
summary(iris)
#>   Sepal.Length    Sepal.Width     Petal.Length    Petal.Width          Species  
#>  Min.   :4.300   Min.   :2.000   Min.   :1.000   Min.   :0.100   setosa    :50  
#>  1st Qu.:5.100   1st Qu.:2.800   1st Qu.:1.600   1st Qu.:0.300   versicolor:50  
#>  Median :5.800   Median :3.000   Median :4.350   Median :1.300   virginica :50  
#>  Mean   :5.843   Mean   :3.057   Mean   :3.758   Mean   :1.199                  
#>  3rd Qu.:6.400   3rd Qu.:3.300   3rd Qu.:5.100   3rd Qu.:1.800                  
#>  Max.   :7.900   Max.   :4.400   Max.   :6.900   Max.   :2.500
Show the code
summary(iris)
#>   Sepal.Length    Sepal.Width     Petal.Length    Petal.Width          Species  
#>  Min.   :4.300   Min.   :2.000   Min.   :1.000   Min.   :0.100   setosa    :50  
#>  1st Qu.:5.100   1st Qu.:2.800   1st Qu.:1.600   1st Qu.:0.300   versicolor:50  
#>  Median :5.800   Median :3.000   Median :4.350   Median :1.300   virginica :50  
#>  Mean   :5.843   Mean   :3.057   Mean   :3.758   Mean   :1.199                  
#>  3rd Qu.:6.400   3rd Qu.:3.300   3rd Qu.:5.100   3rd Qu.:1.800                  
#>  Max.   :7.900   Max.   :4.400   Max.   :6.900   Max.   :2.500
int foo (void) {
    int i;
}
int foo (void) {
    int i;
}
int foo (void) {
    int i;
}
Show the code
sessionInfo()
#> R version 4.2.1 (2022-06-23)
#> Platform: aarch64-apple-darwin20 (64-bit)
#> Running under: macOS Monterey 12.5.1
#> 
#> Matrix products: default
#> BLAS:   /Library/Frameworks/R.framework/Versions/4.2-arm64/Resources/lib/libRblas.0.dylib
#> LAPACK: /Library/Frameworks/R.framework/Versions/4.2-arm64/Resources/lib/libRlapack.dylib
#> 
#> locale:
#> [1] en_US.UTF-8/en_US.UTF-8/en_US.UTF-8/C/en_US.UTF-8/en_US.UTF-8
#> 
#> attached base packages:
#> [1] stats     graphics  grDevices utils     datasets  methods   base     
#> 
#> loaded via a namespace (and not attached):
#>  [1] digest_0.6.29     jsonlite_1.8.0    magrittr_2.0.3    evaluate_0.16     rlang_1.0.4       stringi_1.7.8     cli_3.3.0         rstudioapi_0.14   rmarkdown_2.16.1  tools_4.2.1       stringr_1.4.1     htmlwidgets_1.5.4 xfun_0.32         yaml_2.3.5        fastmap_1.1.0     compiler_4.2.1    htmltools_0.5.3   knitr_1.40