From 707b4660bbfe407902753317089c5e2a44bc77ae Mon Sep 17 00:00:00 2001 From: Jeffrey Dickinson Date: Sat, 4 Nov 2023 20:03:34 +0000 Subject: [PATCH] #12 Comment out call to xportr_write(). --- adam/adpc.qmd | 7 ++++--- adam/adppk.qmd | 7 ++++--- 2 files changed, 8 insertions(+), 6 deletions(-) diff --git a/adam/adpc.qmd b/adam/adpc.qmd index 3a1ff8c..f752b7e 100644 --- a/adam/adpc.qmd +++ b/adam/adpc.qmd @@ -584,7 +584,7 @@ adpc <- adpc_prefinal %>% ## Apply Labels and Formats with xportr -Using `{xportr}` we check variable type, assign variable lenght, add variable labels, add variable formats, and save a transport file. +Using `{xportr}` we check variable type, assign variable lenght, add variable labels, add variable formats, and save a transport file. At the end you could add a call to `xportr::xportr_write()` to produce the XPT file. ```{r} #| label: xportr @@ -594,6 +594,7 @@ adpc_xpt <- adpc %>% xportr_length(metacore) %>% # Assigns SAS length from a variable level metadata xportr_label(metacore) %>% # Assigns variable label from metacore specifications xportr_format(metacore) %>% # Assigns variable format from metacore specifications - xportr_df_label(metacore) %>% # Assigns dataset label from metacore specifications - xportr_write("adpc.xpt") # Write xpt v5 transport file + xportr_df_label(metacore) # Assigns dataset label from metacore specifications + # xportr_write("adpc.xpt") # Write xpt v5 transport file + ``` diff --git a/adam/adppk.qmd b/adam/adppk.qmd index e34b18c..1008525 100644 --- a/adam/adppk.qmd +++ b/adam/adppk.qmd @@ -528,7 +528,7 @@ adppk <- adppk_prefinal %>% ## Apply Labels and Formats with xportr -Using {xportr} we check variable type, assign variable lenght, add variable labels, add variable formats, and save a transport file. +Using {xportr} we check variable type, assign variable lenght, add variable labels, add variable formats, and save a transport file with `xportr::xportr_write()`. ```{r} #| label: xportr @@ -538,6 +538,7 @@ adppk_xpt <- adppk %>% xportr_length(metacore) %>% # Assigns SAS length from a variable level metadata xportr_label(metacore) %>% # Assigns variable label from metacore specifications xportr_format(metacore) %>% # Assigns variable format from metacore specifications - xportr_df_label(metacore) %>% # Assigns dataset label from metacore specifications - xportr_write("adppk.xpt") # Write xpt v5 transport file + xportr_df_label(metacore) # Assigns dataset label from metacore specifications + # xportr_write("adppk.xpt") # Write xpt v5 transport file + ```