Skip to content

Commit

Permalink
chore: #84 style files
Browse files Browse the repository at this point in the history
  • Loading branch information
bms63 committed Jun 6, 2023
1 parent 1f25b30 commit e03ca10
Show file tree
Hide file tree
Showing 2 changed files with 15 additions and 19 deletions.
32 changes: 15 additions & 17 deletions vignettes/deepdive.Rmd
Original file line number Diff line number Diff line change
Expand Up @@ -270,7 +270,6 @@ TODO: Incorrect label applied, none and message still give warning when I have a
TODO: Weird characters in outputs.

```{r, echo = TRUE}
var_spec_lbl <- var_spec %>%
mutate(label = if_else(variable == "TRTSDT",
"Length of variable label must be 40 characters or less", label
Expand Down Expand Up @@ -307,7 +306,6 @@ glimpse(adsl_ord)
TODO: No warning issue for incorrect format type. I put in a "DATA" format and it applied the format even though it is not a valid one.

```{r}
var_spec_fmt <- var_spec %>%
mutate(format = if_else(variable == "TRTSDT", "DATA", format))
Expand All @@ -326,24 +324,24 @@ TODO: I don't think `xportr_write()` works in the README and Get Started


```{r, echo = TRUE, error = TRUE}
adsl %>%
xportr_metadata(var_spec, "ADSL") %>%
xportr_type() %>%
xportr_length() %>%
xportr_label() %>%
xportr_order() %>%
xportr_format() %>%
xportr_write(path = "adsl.xpt", label = "Subject-Level Analysis Dataset", strict_checks = FALSE)
adsl %>%
xportr_metadata(var_spec, "ADSL") %>%
xportr_type() %>%
xportr_length() %>%
xportr_label() %>%
xportr_order() %>%
xportr_format() %>%
xportr_write(path = "adsl.xpt", label = "Subject-Level Analysis Dataset", strict_checks = FALSE)
```

```{r, echo = TRUE, error = TRUE}
adsl %>%
xportr_metadata(var_spec, "ADSL") %>%
xportr_type() %>%
xportr_length() %>%
xportr_label() %>%
xportr_order() %>%
xportr_write(path = "adsl.xpt", label = "Subject-Level Analysis Dataset", strict_checks = TRUE)
adsl %>%
xportr_metadata(var_spec, "ADSL") %>%
xportr_type() %>%
xportr_length() %>%
xportr_label() %>%
xportr_order() %>%
xportr_write(path = "adsl.xpt", label = "Subject-Level Analysis Dataset", strict_checks = TRUE)
```


Expand Down
2 changes: 0 additions & 2 deletions vignettes/xportr.Rmd
Original file line number Diff line number Diff line change
Expand Up @@ -28,8 +28,6 @@ options(
xportr.length = "length",
xportr.order_name = "order"
)
```

```{r, include=FALSE}
Expand Down

0 comments on commit e03ca10

Please sign in to comment.