tests/testthat/_snaps/02.plantuml_file.md

In rkrug/plantuml: Create UML Graphs using PlantUML Syntax

plantuml_yml

Code
  plantuml_yaml(fn_yml)
Output
  $code
  [1] "@startyaml\n\nname: Test yml\na:\n- a\n- b\n- c\nB:\n- C\n- D\n- E\nx:\n- 0.2486851\n- 0.7498182\n\n@endyaml"

  $x
  [1] "@startyaml\n\nname: Test yml\na:\n- a\n- b\n- c\nB:\n- C\n- D\n- E\nx:\n- 0.2486851\n- 0.7498182\n\n@endyaml"

  $evaluated
  [1] FALSE

  $complete
  [1] TRUE

  attr(,"class")
  [1] "plantuml"
Code
  identical(plantuml_yaml(fn_yml), plantuml_file(fn_yml))
Output
  [1] TRUE

plantuml_yaml

Code
  plantuml_yaml(fn_yaml)
Output
  $code
  [1] "@startyaml\n\nname: Test yml\na:\n- a\n- b\n- c\nB:\n- C\n- D\n- E\nx:\n- 0.2486851\n- 0.7498182\n\n@endyaml"

  $x
  [1] "@startyaml\n\nname: Test yml\na:\n- a\n- b\n- c\nB:\n- C\n- D\n- E\nx:\n- 0.2486851\n- 0.7498182\n\n@endyaml"

  $evaluated
  [1] FALSE

  $complete
  [1] TRUE

  attr(,"class")
  [1] "plantuml"
Code
  identical(plantuml_yaml(fn_yaml), plantuml_file(fn_yaml))
Output
  [1] TRUE

plantuml_json

Code
  plantuml_json(fn_json)
Output
  $code
  [1] "@startjson\n{\"name\":[\"Test json\"],\"a\":[\"a\",\"b\",\"c\"],\"B\":[\"C\",\"D\",\"E\"],\"x\":[0.6464,0.6879]}\n@endjson"

  $x
  [1] "@startjson\n{\"name\":[\"Test json\"],\"a\":[\"a\",\"b\",\"c\"],\"B\":[\"C\",\"D\",\"E\"],\"x\":[0.6464,0.6879]}\n@endjson"

  $evaluated
  [1] FALSE

  $complete
  [1] TRUE

  attr(,"class")
  [1] "plantuml"
Code
  identical(plantuml_json(fn_json), plantuml_file(fn_json))
Output
  [1] TRUE

plantuml_csv

Code
  plantuml_csv(fn_csv)
Output
  $code
  [1] "\n '### ### data.frame ### ### ### \n \n \"utils::read.csv(file, ...)\" : class  = data.frame \n \"utils::read.csv(file, ...)\" : typeof  = list \n \"utils::read.csv(file, ...)\" : mode  = list \n \"utils::read.csv(file, ...)\" : length = 5 \n  \n \"utils::read.csv(file, ...)\" : __attributes__ \n  \n \"utils::read.csv(file, ...)\" : .names = X a B x bool \n  \n \"utils::read.csv(file, ...)\" : .row.names = 1 2 3 \n  \n '### ### vma ### ### ### \n \n \"utils::read.csv(file, ...)_1_X\" : class  = integer \n \"utils::read.csv(file, ...)_1_X\" : typeof  = integer \n \"utils::read.csv(file, ...)_1_X\" : mode  = numeric \n \"utils::read.csv(file, ...)_1_X\" : length = 3 \n   \n  \"utils::read.csv(file, ...)\" *--> \"utils::read.csv(file, ...)_1_X\" \n  \n '### ### vma ### ### ### \n \n \"utils::read.csv(file, ...)_2_a\" : class  = character \n \"utils::read.csv(file, ...)_2_a\" : typeof  = character \n \"utils::read.csv(file, ...)_2_a\" : mode  = character \n \"utils::read.csv(file, ...)_2_a\" : length = 3 \n   \n  \"utils::read.csv(file, ...)\" *--> \"utils::read.csv(file, ...)_2_a\" \n  \n '### ### vma ### ### ### \n \n \"utils::read.csv(file, ...)_3_B\" : class  = character \n \"utils::read.csv(file, ...)_3_B\" : typeof  = character \n \"utils::read.csv(file, ...)_3_B\" : mode  = character \n \"utils::read.csv(file, ...)_3_B\" : length = 3 \n   \n  \"utils::read.csv(file, ...)\" *--> \"utils::read.csv(file, ...)_3_B\" \n  \n '### ### vma ### ### ### \n \n \"utils::read.csv(file, ...)_4_x\" : class  = numeric \n \"utils::read.csv(file, ...)_4_x\" : typeof  = double \n \"utils::read.csv(file, ...)_4_x\" : mode  = numeric \n \"utils::read.csv(file, ...)_4_x\" : length = 3 \n   \n  \"utils::read.csv(file, ...)\" *--> \"utils::read.csv(file, ...)_4_x\" \n  \n '### ### vma ### ### ### \n \n \"utils::read.csv(file, ...)_5_bool\" : class  = logical \n \"utils::read.csv(file, ...)_5_bool\" : typeof  = logical \n \"utils::read.csv(file, ...)_5_bool\" : mode  = logical \n \"utils::read.csv(file, ...)_5_bool\" : length = 3 \n   \n  \"utils::read.csv(file, ...)\" *--> \"utils::read.csv(file, ...)_5_bool\" \n "

  $x
  character(0)

  $evaluated
  [1] FALSE

  $complete
  [1] TRUE

  attr(,"class")
  [1] "plantuml"
Code
  identical(plantuml_csv(fn_csv), plantuml_file(fn_csv))
Output
  [1] TRUE

plantuml_rds

Code
  plantuml_rds(fn_rds)
Output
  $code
  [1] "\n '### ### list ### ### ### \n \n \"readRDS(file, ...)\" : class  = list \n \"readRDS(file, ...)\" : typeof  = list \n \"readRDS(file, ...)\" : mode  = list \n \"readRDS(file, ...)\" : length = 4 \n  \n \"readRDS(file, ...)\" : __attributes__ \n  \n \"readRDS(file, ...)\" : .names = name a B x \n  \n '### ### vma ### ### ### \n \n \"readRDS(file, ...)_1_name\" : class  = character \n \"readRDS(file, ...)_1_name\" : typeof  = character \n \"readRDS(file, ...)_1_name\" : mode  = character \n \"readRDS(file, ...)_1_name\" : length = 1 \n   \n  \"readRDS(file, ...)\" *--> \"readRDS(file, ...)_1_name\" \n  \n '### ### vma ### ### ### \n \n \"readRDS(file, ...)_2_a\" : class  = character \n \"readRDS(file, ...)_2_a\" : typeof  = character \n \"readRDS(file, ...)_2_a\" : mode  = character \n \"readRDS(file, ...)_2_a\" : length = 3 \n   \n  \"readRDS(file, ...)\" *--> \"readRDS(file, ...)_2_a\" \n  \n '### ### vma ### ### ### \n \n \"readRDS(file, ...)_3_B\" : class  = character \n \"readRDS(file, ...)_3_B\" : typeof  = character \n \"readRDS(file, ...)_3_B\" : mode  = character \n \"readRDS(file, ...)_3_B\" : length = 3 \n   \n  \"readRDS(file, ...)\" *--> \"readRDS(file, ...)_3_B\" \n  \n '### ### vma ### ### ### \n \n \"readRDS(file, ...)_4_x\" : class  = numeric \n \"readRDS(file, ...)_4_x\" : typeof  = double \n \"readRDS(file, ...)_4_x\" : mode  = numeric \n \"readRDS(file, ...)_4_x\" : length = 2 \n   \n  \"readRDS(file, ...)\" *--> \"readRDS(file, ...)_4_x\" \n "

  $x
  character(0)

  $evaluated
  [1] FALSE

  $complete
  [1] TRUE

  attr(,"class")
  [1] "plantuml"
Code
  identical(plantuml_rds(fn_rds), plantuml_file(fn_rds))
Output
  [1] TRUE

rkrug/plantuml documentation built on June 3, 2023, 6:24 a.m.