---
title: "Rmarkdown partial example"
author: "Ruben Arslan"
date: "2019-07-12"
output:
  html_document:
    self_contained: false
vignette: >
  %\VignetteIndexEntry{Rmarkdown partial example}
  \%VignetteKeyword{rmdpartials}
  %\VignetteEngine{knitr::rmarkdown}
  %\VignetteEncoding{UTF-8}
---

# Introduction

For example, you can make enlarge-able plots:

```{r echo=FALSE}
# knitr::opts_knit$set(child = TRUE)
set.seed(1)
```

## Graphical relationship
```{r}
library(rmdpartials)
library(ggplot2)
x <- rnorm(100)
y <- x + rnorm(100) + 0.5 * x^2
curve <- qplot(x, y)
enlarge_plot(curve, large_plot = curve + theme_classic(base_size = 20), plot_name = "myplot")
```

## Regression
```{r}
reg <- lm(y ~ x)
regression_diagnostics(reg)
```

## Write a partial on the fly
```{r}
x <- 5
y <- 9
partial(text = "`r x` `r y`")
```


## Debug
Learn about environments in partials.

```{r}
knit_child_debug()
```