Quarto20-09-2023

888152

Author

Affiliation

🤑Pannarai Pudongnoi 🤑

ICDI, CMU

Published

September 20, 2023

Quarto

data(cars)
str(cars)

'data.frame':   50 obs. of  2 variables:
 $ speed: num  4 4 7 7 8 9 10 10 10 11 ...
 $ dist : num  2 10 4 22 16 10 18 26 34 17 ...

Introduction

theme for HTML

theme for revealsjs

tabset

Literature Reviews

content

Methodology

content

Results

content

Base Plot

content

plot(cars$speed, cars$dist)

content

Base Plot

content

plot(cars$speed, cars$dist, col = "blue")

content

---
title: "Quarto20-09-2023"
subtitle: "888152"
author: "🤑Pannarai Pudongnoi 🤑"
institute: "ICDI, CMU"
date: "Sep 20, 2023"
format: 
 html: 
    code-line-numbers: true   # show the line number 
    code-tools: true    #share the code 
    #code-fold: true     #fold the line of code 
    #backgroundcolor: "#FADAE2" #colourcode need to put "" but for the name do not need 
    #theme: beige
    highlight-style: haddock #change the color in the chuclk code 
    #revealjs is to make it as a presentation 
    toc: true 
    toc-location: left
    toc-title: "Topics"
    footer: "Data viz" #for revealjs only 
    logo: ICDI.logo.png #for revealjs only 
---

## Quarto

```{r}
data(cars)
str(cars)
```

```{r}
```

## Introduction

[theme for HTML](https://quarto.org/docs/output-formats/html-themes.html)

[theme for revealsjs](https://quarto.org/docs/presentations/revealjs/themes.html)

[tabset](https://quarto.org/docs/interactive/layout.html#tabset-panel)

## Literature Reviews

content

## Methodology

content

## Results

content

## Base Plot

::: panel-tabset
### Code

content

```{r eval =FALSE}
plot(cars$speed, cars$dist)
```

### Result

content

```{r echo=FALSE}
plot(cars$speed, cars$dist)
```
:::

## Base Plot

::: panel-tabset
### Code

content

```{r}
#| eval: false
plot(cars$speed, cars$dist, col = "blue")
```

### Result

content

```{r}
#| echo: false
#| fig-width: 7
#| fig-height: 7
plot(cars$speed, cars$dist, col = "blue")
```
:::