# NOT RUN {
# create a dummy tibble with the right columns
library(tibble)
tib <- tibble(
chr = 1:3,
id = 1:3,
posg = 0,
pos = 1:3,
ref = 'A',
alt = 'B'
)
# a dummy file
file_out <- tempfile('delete-me-example', fileext = '.bim') # will also work without extension
# write the table out in *.bim format (no header, columns in right order)
write_bim(file_out, tib)
# delete output when done
file.remove(file_out)
# }
Run the code above in your browser using DataLab