---
title: "Introduction to the package YPPE"
output: rmarkdown::html_vignette
vignette: >
  %\VignetteIndexEntry{Introduction to the package YPPE}
  %\VignetteEngine{knitr::rmarkdown}
  %\VignetteEncoding{UTF-8}
---

```{r, include = FALSE}
knitr::opts_chunk$set(
  collapse = TRUE,
  comment = "#>"
)
```

```{r setup}
library(YPPE)

mle <- yppe(Surv(time, status)~trt, data=gastric, n_int = 10, approach = "mle", init = 0)
summary(mle)
coef(mle)
vcov(mle)
```