Skip to content
Snippets Groups Projects
Commit 187c20eb authored by Walmes Marques Zeviani's avatar Walmes Marques Zeviani
Browse files

Auxiliar para a vinheta de Baskara.

parent 93465a52
No related branches found
No related tags found
No related merge requests found
---
title: "Raízes de Equação de Segundo Grau"
author: "Ferando Mayer & Walmes Zeviani"
date: "`Sys.time()`"
output:
rmarkdown::html_vignette:
fig_width: 6
fig_height: 6
toc: true
toc_dep: 3
vignette: >
%\VignetteIndexEntry{Teorema de Pitágoras}
%\VignetteEngine{knitr::rmarkdown}
%\VignetteEncoding{UTF-8}
---
```{r, include=FALSE, purl=FALSE, include=FALSE}
## Carrega o pacote em desenvolvimento.
library(devtools)
load_all("../meupacote/")
```
Seja $f(x) = 3*x^2 - 1*x - 2$ uma parábola. Pela fórmula de Báskara
podemos determinar as raízes dessa equação. A função `baskara()` retorna
as raízes de uma função.
```{r, eval=FALSE}
## Carrega o pacote instalado.
library(meupacote)
```
```{r}
## Conteúdo disponível do pacote.
ls("package:meupacote")
## Calcula as raízes da função.
r <- baskara(a = 3, b = -1, c = -2)
r
## Faz o gráfico.
curve(3*x^2-1*x-2, from = -1, to = 1)
abline(v = r, lty = 2)
## Mostrar como usar o método plot() e coef().
```
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Please register or to comment