shiny.qmd

---
title: Shiny Example
server: shiny # necessary for shiny interactive elements
format:
  revealjs:
    # CREATION METADATA
    author:
      name: Research Computing
      affilitation: UAB
    copyright: "© University of Alabama at Birmingham"
    date: today # default date
    date-format: YYYY-MM-DD
    # OPTIONS - CONTROLS
    controls: true
    controls-layout: bottom-right
    controls-back-arrows: faded
    # OPTIONS - FEATURES
    code-annotation: select
    title-slide-attributes:
      data-align: left
    #
    # DEVELOPER ONLY
    width: 1280
    height: 720
    auto-stretch: false
    history: true
    menu: false
    progress: true
    revealjs-plugins:
      - rStackFix
    # DEVELOPER ONLY - STYLE AND THEME
    highlight-style: runtime/theme/uab-rc.theme # code highlighting
    css:
      - runtime/theme/uab-rc.css # uab theming
      - runtime/theme/fix-r-stack-hack.css # fixes r-stack div
    include-in-header:
      - runtime/includes/head.html
    include-after-body:
      - runtime/includes/footer.html
---

## Direct Code Example - R

```{r}
print("Hello World!")
```

## Included Code Example - R

```{r}
{{< include src/code-example.R >}}
```

## Interactive Iris Dataset - Shiny

<!-- UI Sidebar -->

```{r}
#| panel: sidebar
{{< include src/shiny-ui-sidebar.R >}}
```

<!-- UI Plot -->

```{r}
#| panel: fill
{{< include src/shiny-ui-plot.R >}}
```

<!-- Local server backend code-->

```{r}
#| context: server
{{< include src/shiny-ui-server.R >}}
```