## code to prepare `btps_df` dataset goes here
btps_df <- data.frame(
Gas_temp_c = c(20:37),
Factor_37 = c(
1.102, 1.096, 1.091, 1.085, 1.080, 1.075, 1.068, 1.063,
1.057, 1.051, 1.045, 1.039, 1.032, 1.026, 1.020, 1.014, 1.007, 1.000
)
)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.