Reads 13c data from a BreathID file, and returns a structure
of class breathtest_data.
Value
Structure of class breathtest_data
Examples
filename = btcore_file("350_20043_0_GER.txt")
# Show first lines
cat(readLines(filename, n = 10), sep="\n")
#> Test and Patient parameters
#>
#>
#> Date - 12/11/12
#> End time - 08:54
#> Start time - 12:49
#> Patient # - 0
#> Patient ID - Franz
#> Test No. - 20043
#> Type - Octanoic-Acid
#
bid = read_breathid(filename)
str(bid)
#> List of 23
#> $ patient_id : chr "0"
#> $ name : logi NA
#> $ first_name : logi NA
#> $ initials : logi NA
#> $ dob : logi NA
#> $ birth_year : logi NA
#> $ gender : chr "m"
#> $ study : logi NA
#> $ pat_study_id: logi NA
#> $ file_name : chr "350_20043_0_GER.txt"
#> $ device : chr "BreathID"
#> $ substrate : chr "octanoate"
#> $ record_date : chr "2012-12-11"
#> $ start_time : chr "2012-12-11 08:54"
#> $ end_time : chr "2012-12-11 12:49"
#> $ test_no : int 20043
#> $ dose : num 100
#> $ height : num 180
#> $ weight : num 75
#> $ t50 : num 71.2
#> $ gec : num 2.99
#> $ tlag : num 28.2
#> $ data :'data.frame': 87 obs. of 6 variables:
#> ..$ minute : num [1:87] 0 0.5 1.6 6.4 8.9 11.3 13.7 16 18.5 23.3 ...
#> ..$ dob : num [1:87] 0 -0.1 0.4 0.3 1.6 2.9 3.3 3.7 4.5 5.4 ...
#> ..$ pdr : num [1:87] 0 -0.1 0.4 0.3 1.7 3.1 3.5 3.9 4.7 5.7 ...
#> ..$ pdrfit : num [1:87] 0 0.2 0.5 1.8 2.5 3.1 3.7 4.2 4.8 5.7 ...
#> ..$ cpdr : num [1:87] 0 0 0 0 0.1 0.2 0.3 0.4 0.6 1 ...
#> ..$ cpdrfit: num [1:87] 0 0 0 0.1 0.2 0.3 0.4 0.6 0.7 1.1 ...
#> - attr(*, "class")= chr "breathtest_data"