# This example uses a sample file included with the package.
sample_file <- system.file("extdata", "sample_params.csv", package = "topolow")
# Ensure the file exists before running the example
if (nzchar(sample_file)) {
# Transform the data from the sample file and return as a data frame
transformed_data <- log_transform_parameters(sample_file, output_file = NULL)
# Display the first few rows of the transformed data
print(head(transformed_data))
}
Run the code above in your browser using DataLab