Update Genetic Method
update_genetic_method.Rdupdate_genetic_method() updates an existing genetic method in the genetic method lookup table
Arguments
- con
A DBI connection object obtained from DBI::dbConnect()
- genetic_method_id
A numeric ID for the targeted genetic method
get_genetic_methods- genetic_method
A valid genetic method dataframe with the following:
code character 4 letter code in all caps
method_name character Short name for method
description character Brief description of method
See also
Other genetic method functions:
add_genetic_method(),
delete_genetic_method(),
get_genetic_methods(),
update_genetic_method_status()
Examples
# example database connection
cfg <- config::get()
con <- DBI::dbConnect(RPostgres::Postgres(),
dbname = cfg$dbname,
host = cfg$host,
port = cfg$port,
user = cfg$username,
password = cfg$password)
#> Error: connection to server at "localhost" (::1), port 5432 failed: Connection refused (0x0000274D/10061)
#> Is the server running on that host and accepting TCP/IP connections?
#> connection to server at "localhost" (127.0.0.1), port 5432 failed: Connection refused (0x0000274D/10061)
#> Is the server running on that host and accepting TCP/IP connections?
all_methods <- get_genetic_methods(con)
#> Error in h(simpleError(msg, call)): error in evaluating the argument 'dbObj' in selecting a method for function 'dbIsValid': object 'con' not found
View(all_methods) # to view the ID of the genetic method needing updates
#> Error in eval(expr, envir, enclos): object 'all_methods' not found
updated_method <- data.frame(code = "SHLK", method_name = "Sherlock",
description = "Changed the description")
update_genetic_method(con, genetic_method_id = 1, updated_method)
#> Error in h(simpleError(msg, call)): error in evaluating the argument 'dbObj' in selecting a method for function 'dbIsValid': object 'con' not found