R/naming.R
naming_k.Rd
Naming convention, which adds k prefix for each key, capitalizes and removes file extension
naming_k(path)
path | full path or its element |
---|
#> [1] "kMyfile"# Using with full_path_chain tmp <- create_temp_dir("files") create_sample_dir(tmp, override = TRUE)#> [1] TRUE#> $. #> [1] "/tmp/Rtmp4l1UVj/files" #> #> $kData #> $kData$. #> [1] "/tmp/Rtmp4l1UVj/files/data" #> #> $kData$kExample1 #> [1] "/tmp/Rtmp4l1UVj/files/data/example1.RData" #> #> $kData$kExample2 #> [1] "/tmp/Rtmp4l1UVj/files/data/example2.RData" #> #> $kData$kPersons #> [1] "/tmp/Rtmp4l1UVj/files/data/persons.csv" #> #> #> $kDocs #> $kDocs$. #> [1] "/tmp/Rtmp4l1UVj/files/docs" #> #> $kDocs$kSchema #> [1] "/tmp/Rtmp4l1UVj/files/docs/schema.txt" #> #>#> Warning: katalog '/tmp/Rtmp4l1UVj/files' już istnieje#> Warning: katalog '/tmp/Rtmp4l1UVj/files/docs' już istnieje#> Warning: katalog '/tmp/Rtmp4l1UVj/files/data' już istnieje#> [1] TRUE# Using with path_chain / create_path_chain path.chain <- path_chain(tmp, naming = naming_k) path.chain %>% as.list()#> $root.dir #> [1] "files/" #> #> $kData #> $kData$root.dir #> [1] "data/" #> #> $kData$kExample1 #> [1] "example1.RData" #> #> $kData$kExample2 #> [1] "example2.RData" #> #> $kData$kPersons #> [1] "persons.csv" #> #> #> $kDocs #> $kDocs$root.dir #> [1] "docs/" #> #> $kDocs$kSchema #> [1] "schema.txt" #> #>