knitr::opts_chunk$set(
  collapse = TRUE,
  comment = "#>",
  fig.path = "man/figures/README-",
  out.width = "100%"
)

ProcessIsodataOuts

Travis build status R-CMD-check

The goal of ProcessIsodataOuts is to read files from isodat, assign AA peak names, and then correct sample data based on standard runs. This package is still under development.

Installation

You can install the development version from GitHub with:

# install.packages("devtools")
devtools::install_github("catrinanowakowski/process_isodata_outs")

Example

This is a basic example which shows you how to solve a common problem:

library(ProcessIsodataOuts)


file_data <- c("C:/Thermo/Isodat NT/Global/User/Conflo IV Interface/Conflo IV Interface/Results/sherwood_220225_intercal_d13C/data")
AAStd_name <-  "772AAstd2"
AA_list <- c("Ala", "Gly", "Thr", "Ser", "Val", "Leu", "Ile", "NLeu", "Pro", "Asp", "Glu", "Phe", "Tyr", "Lys")
C_N <- "C"
fl_nm <- "sherwood_220225_intercal_d13C"
order_AAs <- "Type" # "Type"
cyano <- "762cyano"
fish_muscle <- "763fish1"



# # ## A separate place where you want your final sample data to be stored:
file_save <- "C:/Users/EcoGeoChemLab/Documents"
# 
# ## Where this file you are using now lives:
# file_home <- "C:/Users/EcoGeoChemLab/isodat_processing"

## Carbon AA std files for your lab
file_save_AAstds_C <- "C:/Users/EcoGeoChemLab/Documents/AAStds_C"
## Carbon Labstd files for your lab
file_save_stds_C <- "C:/Users/EcoGeoChemLab/Documents/Stds_C"


## Nitrogen AA std files for your lab
file_save_AAstds_N <- "C:/Users/EcoGeoChemLab/Documents/AAStds_N"
## Nitrogen Labstd files for your lab
file_save_stds_N <- "C:/Users/EcoGeoChemLab/Documents/Stds_N"

##############################################################################
##############################################################################
## Code you shouldn't need to touch:

# file_sorc <- paste0(file_home, "/sorc") ## Where your source files are stored (These you should never have to touch, and should be the same if you are running normal data corrections or std test runs)

#######################
# source(paste0(file_sorc, "/process_CSIA_full_run.r"))     
outs <- process_CSIA_full_run()
all_fn_std_df <- outs$all_fn_std_df
all_fn_df <- outs$all_fn_df


catrinanowakowski/ProcessIsodataOuts documentation built on Jan. 29, 2023, 5:09 p.m.