tests/testthat/helper-01_sdf_standard_error.R

expected_sdf_standard_error <-
  structure(
    list(
      ref = c(
        "000000000", "111111111", "222222222",
        "333333333", "444444444", "555555555", "666666666", "777777777"
      ), xColumn = c(
        "200", "300", "400", "500", "600", "700", "800",
        "900"
      ), yColumn = c(
        0x1.ep+6, 0x1.b8p+7, 0x1.4p+8, 0x1.a4p+8,
        0x1.04p+9, 0x1.36p+9, 0x1.68p+9, 0x1.9ap+9
      ), zColumn = c(
        0x1.4p+3,
        0x1.4p+4, 0x1.ep+4, 0x1.4p+5, 0x1.a8p+5, 0x1.ep+5, 0x1.18p+6,
        0x1.4p+6
      ), stdError = c(
        0x1.52b952c7bcc28p+3, 0x1.c3b3c2c7f7456p+3,
        0x1.0cbf977caebe5p+4, 0x1.312017f7c1e86p+4, 0x1.65a0af5bc89b2p+4,
        0x1.6eb60bd6012a1p+4, 0x1.89cd2c252fef2p+4, 0x1.a31bfdcc2b158p+4
      )
    ),
    .Names = c("ref", "xColumn", "yColumn", "zColumn", "stdError"),
    row.names = c(NA, -8L),
    class = c("tbl_df", "tbl", "data.frame")
  )
nathaneastwood/sparkts documentation built on May 25, 2019, 10:34 p.m.