R Under development (unstable) (2024-03-11 r86098 ucrt) -- "Unsuffered Consequences" Copyright (C) 2024 The R Foundation for Statistical Computing Platform: x86_64-w64-mingw32/x64 R is free software and comes with ABSOLUTELY NO WARRANTY. You are welcome to redistribute it under certain conditions. Type 'license()' or 'licence()' for distribution details. R is a collaborative project with many contributors. Type 'contributors()' for more information and 'citation()' on how to cite R or R packages in publications. Type 'demo()' for some demos, 'help()' for on-line help, or 'help.start()' for an HTML browser interface to help. Type 'q()' to quit R. > library(testthat) > library(assignPOP) > > test_check("assignPOP") Correct assignment rates were estimated!! A total of 3 assignment tests for 3 pops. Results were also saved in a 'Rate_of_3_tests_3_pops.txt' file in the directory. Correct assignment rates were estimated!! A total of 3 assignment tests for 3 pops. Results were also saved in a 'Rate_of_3_tests_3_pops.txt' file in the directory. Converting data format... Encoding genetic data... ################ assignPOP v1.3.0 ################ A GENEPOP format file was successfully imported! Imported Data Info: 24 obs. by 5 loci (diploid) Number of pop: 3 Number of inds (pop.1): 8 Number of inds (pop.2): 10 Number of inds (pop.3): 6 DataMatrix: 24 rows by 20 columns, with 19 allele variables Data output in a list comprising the following three elements: YOUR_LIST_NAME$DataMatrix YOUR_LIST_NAME$SampleID YOUR_LIST_NAME$LocusName Parallele computing is off. Analyzing data using 1 CPU core... Monte-Carlo cross-validation done!! 3 assignment tests completed!! Parallele computing is off. Analyzing data using 1 CPU core... Monte-Carlo cross-validation done!! 3 assignment tests completed!! Parallele computing is off. Analyzing data using 1 CPU core... Monte-Carlo cross-validation done!! 6 assignment tests completed!! Parallele computing is off. Analyzing data using 1 CPU core... Monte-Carlo cross-validation done!! 12 assignment tests completed!! Parallele computing is off. Analyzing data using 1 CPU core... Monte-Carlo cross-validation done!! 12 assignment tests completed!! Parallele computing is off. Analyzing data using 1 CPU core... Monte-Carlo cross-validation done!! 3 assignment tests completed!! Converting data format... Encoding genetic data... ################ assignPOP v1.3.0 ################ A GENEPOP format file was successfully imported! Imported Data Info: 24 obs. by 5 loci (diploid) Number of pop: 3 Number of inds (pop.1): 8 Number of inds (pop.2): 10 Number of inds (pop.3): 6 DataMatrix: 24 rows by 20 columns, with 19 allele variables Data output in a list comprising the following three elements: YOUR_LIST_NAME$DataMatrix YOUR_LIST_NAME$SampleID YOUR_LIST_NAME$LocusName Converting data format... Encoding genetic data... ################ assignPOP v1.3.0 ################ A GENEPOP format file was successfully imported! Imported Data Info: 24 obs. by 5 loci (diploid) Number of pop: 1 Number of inds (pop.1): 24 DataMatrix: 24 rows by 20 columns, with 19 allele variables Data output in a list comprising the following three elements: YOUR_LIST_NAME$DataMatrix YOUR_LIST_NAME$SampleID YOUR_LIST_NAME$LocusName Known and unknown datasets have identical features. Performing PCA on genetic data for dimensionality reduction... Assignment test is done! See results in your designated folder. Predicted populations and probabilities are saved in [AssignmentResult.txt] Converting data format... Encoding genetic data... ################ assignPOP v1.3.0 ################ A GENEPOP format file was successfully imported! Imported Data Info: 24 obs. by 5 loci (diploid) Number of pop: 3 Number of inds (pop.1): 8 Number of inds (pop.2): 10 Number of inds (pop.3): 6 DataMatrix: 24 rows by 20 columns, with 19 allele variables Data output in a list comprising the following three elements: YOUR_LIST_NAME$DataMatrix YOUR_LIST_NAME$SampleID YOUR_LIST_NAME$LocusName Parallele computing is off. Analyzing data using 1 CPU core... K-fold cross-validation done!! 3 assignment tests completed!! Import a .CSV file. 4 additional variables detected. Checking variable data type... ng1(integer) ng2(integer) ng3(integer) ng4(integer) New data set created!! It has 24 observations by 24 variables including 4 loci(19 alleles) plus 4 additional variables(4 columns) Parallele computing is off. Analyzing data using 1 CPU core... K-fold cross-validation done!! 3 assignment tests completed!! Convert population label to factor. ng1(integer) ng2(integer) ng3(integer) ng4(integer) Parallele computing is off. Analyzing data using 1 CPU core... K-fold cross-validation done!! 3 assignment tests completed!! Results were saved in a 'High_Fst_Locus_Freq.txt' file in the directory.[ FAIL 3 | WARN 0 | SKIP 0 | PASS 39 ] ══ Failed tests ════════════════════════════════════════════════════════════════ ── Failure ('test_accuracy.R:8:3'): Calculate assignment accuracy for Monte-Carlo results ── `str\(plot\)` does not match "List of 9". Actual value: "List of 11\\n \$ data :'data\.frame':\\t3 obs\. of 7 variables:\\n \.\.\$ train\.inds : Factor w/ 1 level "0\.5": 1 1 1\\n \.\.\$ train\.loci : Factor w/ 1 level "1": 1 1 1\\n \.\.\$ iters : Factor w/ 3 levels "1","2","3": 1 2 3\\n \.\.\$ assign\.rate\.all : num \[1:3\] 0\.417 0\.25 0\.333\\n \.\.\$ assign\.rate\.pop\.1: num \[1:3\] 0\.25 0 1\\n \.\.\$ assign\.rate\.pop\.2: num \[1:3\] 0\.8 0\.4 0\\n \.\.\$ assign\.rate\.pop\.3: num \[1:3\] 0 0\.333 0\\n \$ layers :List of 1\\n \.\.\$ :Classes 'LayerInstance', 'Layer', 'ggproto', 'gg' \\n aes_params: list\\n compute_aesthetics: function\\n compute_geom_1: function\\n compute_geom_2: function\\n compute_position: function\\n compute_statistic: function\\n computed_geom_params: NULL\\n computed_mapping: NULL\\n computed_stat_params: NULL\\n constructor: call\\n data: waiver\\n draw_geom: function\\n finish_statistics: function\\n geom: \\n aesthetics: function\\n default_aes: uneval\\n draw_group: function\\n draw_key: function\\n draw_layer: function\\n draw_panel: function\\n extra_params: na\.rm width orientation outliers\\n handle_na: function\\n non_missing_aes: \\n optional_aes: \\n parameters: function\\n rename_size: TRUE\\n required_aes: x\|y lower\|xlower upper\|xupper middle\|xmiddle ymin\|xmin y \.\.\.\\n setup_data: function\\n setup_params: function\\n use_defaults: function\\n super: \\n geom_params: list\\n inherit\.aes: TRUE\\n layer_data: function\\n map_statistic: function\\n mapping: NULL\\n position: \\n compute_layer: function\\n compute_panel: function\\n padding: 0\.1\\n preserve: total\\n required_aes: \\n reverse: FALSE\\n setup_data: function\\n setup_params: function\\n width: NULL\\n super: \\n print: function\\n setup_layer: function\\n show\.legend: NA\\n stat: \\n aesthetics: function\\n compute_group: function\\n compute_layer: function\\n compute_panel: function\\n default_aes: uneval\\n dropped_aes: x y weight\\n extra_params: na\.rm orientation\\n finish_layer: function\\n non_missing_aes: weight\\n optional_aes: \\n parameters: function\\n required_aes: y\|x\\n retransform: TRUE\\n setup_data: function\\n setup_params: function\\n super: \\n stat_params: list\\n super: \\n \$ scales :Classes 'ScalesList', 'ggproto', 'gg' \\n add: function\\n add_defaults: function\\n add_missing: function\\n backtransform_df: function\\n clone: function\\n find: function\\n get_scales: function\\n has_scale: function\\n input: function\\n map_df: function\\n n: function\\n non_position_scales: function\\n scales: list\\n train_df: function\\n transform_df: function\\n super: \\n \$ guides :Classes 'Guides', 'ggproto', 'gg' \\n add: function\\n assemble: function\\n build: function\\n draw: function\\n get_custom: function\\n get_guide: function\\n get_params: function\\n get_position: function\\n guides: NULL\\n merge: function\\n missing: \\n add_title: function\\n arrange_layout: function\\n assemble_drawing: function\\n available_aes: any\\n build_decor: function\\n build_labels: function\\n build_ticks: function\\n build_title: function\\n draw: function\\n draw_early_exit: function\\n elements: list\\n extract_decor: function\\n extract_key: function\\n extract_params: function\\n get_layer_key: function\\n hashables: list\\n measure_grobs: function\\n merge: function\\n override_elements: function\\n params: list\\n process_layers: function\\n setup_elements: function\\n setup_params: function\\n train: function\\n transform: function\\n super: \\n package_box: function\\n print: function\\n process_layers: function\\n setup: function\\n subset_guides: function\\n train: function\\n update_params: function\\n super: \\n \$ mapping :List of 2\\n \.\.\$ x: language ~\.data\[\["train\.inds"\]\]\\n \.\. \.\.- attr\(\*, "\.Environment"\)= \\n \.\.\$ y: language ~col\\n \.\. \.\.- attr\(\*, "\.Environment"\)= \\n \.\.- attr\(\*, "class"\)= chr "uneval"\\n \$ theme :List of 136\\n \.\.\$ line :List of 6\\n \.\. \.\.\$ colour : chr "black"\\n \.\. \.\.\$ linewidth : num 0\.5\\n \.\. \.\.\$ linetype : num 1\\n \.\. \.\.\$ lineend : chr "butt"\\n \.\. \.\.\$ arrow : logi FALSE\\n \.\. \.\.\$ inherit\.blank: logi TRUE\\n \.\. \.\.- attr\(\*, "class"\)= chr \[1:2\] "element_line" "element"\\n \.\.\$ rect :List of 5\\n \.\. \.\.\$ fill : chr "white"\\n \.\. \.\.\$ colour : chr "black"\\n \.\. \.\.\$ linewidth : num 0\.5\\n \.\. \.\.\$ linetype : num 1\\n \.\. \.\.\$ inherit\.blank: logi TRUE\\n \.\. \.\.- attr\(\*, "class"\)= chr \[1:2\] "element_rect" "element"\\n \.\.\$ text :List of 11\\n \.\. \.\.\$ family : chr ""\\n \.\. \.\.\$ face : chr "plain"\\n \.\. \.\.\$ colour : chr "black"\\n \.\. \.\.\$ size : num 11\\n \.\. \.\.\$ hjust : num 0\.5\\n \.\. \.\.\$ vjust : num 0\.5\\n \.\. \.\.\$ angle : num 0\\n \.\. \.\.\$ lineheight : num 0\.9\\n \.\. \.\.\$ margin : 'margin' num \[1:4\] 0points 0points 0points 0points\\n \.\. \.\. \.\.- attr\(\*, "unit"\)= int 8\\n \.\. \.\.\$ debug : logi FALSE\\n \.\. \.\.\$ inherit\.blank: logi TRUE\\n \.\. \.\.- attr\(\*, "class"\)= chr \[1:2\] "element_text" "element"\\n \.\.\$ title : NULL\\n \.\.\$ aspect\.ratio : NULL\\n \.\.\$ axis\.title : NULL\\n \.\.\$ axis\.title\.x :List of 11\\n \.\. \.\.\$ family : NULL\\n \.\. \.\.\$ face : NULL\\n \.\. \.\.\$ colour : NULL\\n \.\. \.\.\$ size : NULL\\n \.\. \.\.\$ hjust : NULL\\n \.\. \.\.\$ vjust : num 1\\n \.\. \.\.\$ angle : NULL\\n \.\. \.\.\$ lineheight : NULL\\n \.\. \.\.\$ margin : 'margin' num \[1:4\] 2\.75points 0points 0points 0points\\n \.\. \.\. \.\.- attr\(\*, "unit"\)= int 8\\n \.\. \.\.\$ debug : NULL\\n \.\. \.\.\$ inherit\.blank: logi TRUE\\n \.\. \.\.- attr\(\*, "class"\)= chr \[1:2\] "element_text" "element"\\n \.\.\$ axis\.title\.x\.top :List of 11\\n \.\. \.\.\$ family : NULL\\n \.\. \.\.\$ face : NULL\\n \.\. \.\.\$ colour : NULL\\n \.\. \.\.\$ size : NULL\\n \.\. \.\.\$ hjust : NULL\\n \.\. \.\.\$ vjust : num 0\\n \.\. \.\.\$ angle : NULL\\n \.\. \.\.\$ lineheight : NULL\\n \.\. \.\.\$ margin : 'margin' num \[1:4\] 0points 0points 2\.75points 0points\\n \.\. \.\. \.\.- attr\(\*, "unit"\)= int 8\\n \.\. \.\.\$ debug : NULL\\n \.\. \.\.\$ inherit\.blank: logi TRUE\\n \.\. \.\.- attr\(\*, "class"\)= chr \[1:2\] "element_text" "element"\\n \.\.\$ axis\.title\.x\.bottom : NULL\\n \.\.\$ axis\.title\.y :List of 11\\n \.\. \.\.\$ family : NULL\\n \.\. \.\.\$ face : NULL\\n \.\. \.\.\$ colour : NULL\\n \.\. \.\.\$ size : NULL\\n \.\. \.\.\$ hjust : NULL\\n \.\. \.\.\$ vjust : num 1\\n \.\. \.\.\$ angle : num 90\\n \.\. \.\.\$ lineheight : NULL\\n \.\. \.\.\$ margin : 'margin' num \[1:4\] 0points 2\.75points 0points 0points\\n \.\. \.\. \.\.- attr\(\*, "unit"\)= int 8\\n \.\. \.\.\$ debug : NULL\\n \.\. \.\.\$ inherit\.blank: logi TRUE\\n \.\. \.\.- attr\(\*, "class"\)= chr \[1:2\] "element_text" "element"\\n \.\.\$ axis\.title\.y\.left : NULL\\n \.\.\$ axis\.title\.y\.right :List of 11\\n \.\. \.\.\$ family : NULL\\n \.\. \.\.\$ face : NULL\\n \.\. \.\.\$ colour : NULL\\n \.\. \.\.\$ size : NULL\\n \.\. \.\.\$ hjust : NULL\\n \.\. \.\.\$ vjust : num 1\\n \.\. \.\.\$ angle : num -90\\n \.\. \.\.\$ lineheight : NULL\\n \.\. \.\.\$ margin : 'margin' num \[1:4\] 0points 0points 0points 2\.75points\\n \.\. \.\. \.\.- attr\(\*, "unit"\)= int 8\\n \.\. \.\.\$ debug : NULL\\n \.\. \.\.\$ inherit\.blank: logi TRUE\\n \.\. \.\.- attr\(\*, "class"\)= chr \[1:2\] "element_text" "element"\\n \.\.\$ axis\.text :List of 11\\n \.\. \.\.\$ family : NULL\\n \.\. \.\.\$ face : NULL\\n \.\. \.\.\$ colour : chr "grey30"\\n \.\. \.\.\$ size : 'rel' num 0\.8\\n \.\. \.\.\$ hjust : NULL\\n \.\. \.\.\$ vjust : NULL\\n \.\. \.\.\$ angle : NULL\\n \.\. \.\.\$ lineheight : NULL\\n \.\. \.\.\$ margin : NULL\\n \.\. \.\.\$ debug : NULL\\n \.\. \.\.\$ inherit\.blank: logi TRUE\\n \.\. \.\.- attr\(\*, "class"\)= chr \[1:2\] "element_text" "element"\\n \.\.\$ axis\.text\.x :List of 11\\n \.\. \.\.\$ family : NULL\\n \.\. \.\.\$ face : NULL\\n \.\. \.\.\$ colour : NULL\\n \.\. \.\.\$ size : NULL\\n \.\. \.\.\$ hjust : NULL\\n \.\. \.\.\$ vjust : num 1\\n \.\. \.\.\$ angle : NULL\\n \.\. \.\.\$ lineheight : NULL\\n \.\. \.\.\$ margin : 'margin' num \[1:4\] 2\.2points 0points 0points 0points\\n \.\. \.\. \.\.- attr\(\*, "unit"\)= int 8\\n \.\. \.\.\$ debug : NULL\\n \.\. \.\.\$ inherit\.blank: logi TRUE\\n \.\. \.\.- attr\(\*, "class"\)= chr \[1:2\] "element_text" "element"\\n \.\.\$ axis\.text\.x\.top :List of 11\\n \.\. \.\.\$ family : NULL\\n \.\. \.\.\$ face : NULL\\n \.\. \.\.\$ colour : NULL\\n \.\. \.\.\$ size : NULL\\n \.\. \.\.\$ hjust : NULL\\n \.\. \.\.\$ vjust : num 0\\n \.\. \.\.\$ angle : NULL\\n \.\. \.\.\$ lineheight : NULL\\n \.\. \.\.\$ margin : 'margin' num \[1:4\] 0points 0points 2\.2points 0points\\n \.\. \.\. \.\.- attr\(\*, "unit"\)= int 8\\n \.\. \.\.\$ debug : NULL\\n \.\. \.\.\$ inherit\.blank: logi TRUE\\n \.\. \.\.- attr\(\*, "class"\)= chr \[1:2\] "element_text" "element"\\n \.\.\$ axis\.text\.x\.bottom : NULL\\n \.\.\$ axis\.text\.y :List of 11\\n \.\. \.\.\$ family : NULL\\n \.\. \.\.\$ face : NULL\\n \.\. \.\.\$ colour : NULL\\n \.\. \.\.\$ size : NULL\\n \.\. \.\.\$ hjust : num 1\\n \.\. \.\.\$ vjust : NULL\\n \.\. \.\.\$ angle : NULL\\n \.\. \.\.\$ lineheight : NULL\\n \.\. \.\.\$ margin : 'margin' num \[1:4\] 0points 2\.2points 0points 0points\\n \.\. \.\. \.\.- attr\(\*, "unit"\)= int 8\\n \.\. \.\.\$ debug : NULL\\n \.\. \.\.\$ inherit\.blank: logi TRUE\\n \.\. \.\.- attr\(\*, "class"\)= chr \[1:2\] "element_text" "element"\\n \.\.\$ axis\.text\.y\.left : NULL\\n \.\.\$ axis\.text\.y\.right :List of 11\\n \.\. \.\.\$ family : NULL\\n \.\. \.\.\$ face : NULL\\n \.\. \.\.\$ colour : NULL\\n \.\. \.\.\$ size : NULL\\n \.\. \.\.\$ hjust : num 0\\n \.\. \.\.\$ vjust : NULL\\n \.\. \.\.\$ angle : NULL\\n \.\. \.\.\$ lineheight : NULL\\n \.\. \.\.\$ margin : 'margin' num \[1:4\] 0points 0points 0points 2\.2points\\n \.\. \.\. \.\.- attr\(\*, "unit"\)= int 8\\n \.\. \.\.\$ debug : NULL\\n \.\. \.\.\$ inherit\.blank: logi TRUE\\n \.\. \.\.- attr\(\*, "class"\)= chr \[1:2\] "element_text" "element"\\n \.\.\$ axis\.text\.theta : NULL\\n \.\.\$ axis\.text\.r :List of 11\\n \.\. \.\.\$ family : NULL\\n \.\. \.\.\$ face : NULL\\n \.\. \.\.\$ colour : NULL\\n \.\. \.\.\$ size : NULL\\n \.\. \.\.\$ hjust : num 0\.5\\n \.\. \.\.\$ vjust : NULL\\n \.\. \.\.\$ angle : NULL\\n \.\. \.\.\$ lineheight : NULL\\n \.\. \.\.\$ margin : 'margin' num \[1:4\] 0points 2\.2points 0points 2\.2points\\n \.\. \.\. \.\.- attr\(\*, "unit"\)= int 8\\n \.\. \.\.\$ debug : NULL\\n \.\. \.\.\$ inherit\.blank: logi TRUE\\n \.\. \.\.- attr\(\*, "class"\)= chr \[1:2\] "element_text" "element"\\n \.\.\$ axis\.ticks :List of 6\\n \.\. \.\.\$ colour : chr "grey20"\\n \.\. \.\.\$ linewidth : NULL\\n \.\. \.\.\$ linetype : NULL\\n \.\. \.\.\$ lineend : NULL\\n \.\. \.\.\$ arrow : logi FALSE\\n \.\. \.\.\$ inherit\.blank: logi TRUE\\n \.\. \.\.- attr\(\*, "class"\)= chr \[1:2\] "element_line" "element"\\n \.\.\$ axis\.ticks\.x : NULL\\n \.\.\$ axis\.ticks\.x\.top : NULL\\n \.\.\$ axis\.ticks\.x\.bottom : NULL\\n \.\.\$ axis\.ticks\.y : NULL\\n \.\.\$ axis\.ticks\.y\.left : NULL\\n \.\.\$ axis\.ticks\.y\.right : NULL\\n \.\.\$ axis\.ticks\.theta : NULL\\n \.\.\$ axis\.ticks\.r : NULL\\n \.\.\$ axis\.minor\.ticks\.x\.top : NULL\\n \.\.\$ axis\.minor\.ticks\.x\.bottom : NULL\\n \.\.\$ axis\.minor\.ticks\.y\.left : NULL\\n \.\.\$ axis\.minor\.ticks\.y\.right : NULL\\n \.\.\$ axis\.minor\.ticks\.theta : NULL\\n \.\.\$ axis\.minor\.ticks\.r : NULL\\n \.\.\$ axis\.ticks\.length : 'simpleUnit' num 2\.75points\\n \.\. \.\.- attr\(\*, "unit"\)= int 8\\n \.\.\$ axis\.ticks\.length\.x : NULL\\n \.\.\$ axis\.ticks\.length\.x\.top : NULL\\n \.\.\$ axis\.ticks\.length\.x\.bottom : NULL\\n \.\.\$ axis\.ticks\.length\.y : NULL\\n \.\.\$ axis\.ticks\.length\.y\.left : NULL\\n \.\.\$ axis\.ticks\.length\.y\.right : NULL\\n \.\.\$ axis\.ticks\.length\.theta : NULL\\n \.\.\$ axis\.ticks\.length\.r : NULL\\n \.\.\$ axis\.minor\.ticks\.length : 'rel' num 0\.75\\n \.\.\$ axis\.minor\.ticks\.length\.x : NULL\\n \.\.\$ axis\.minor\.ticks\.length\.x\.top : NULL\\n \.\.\$ axis\.minor\.ticks\.length\.x\.bottom: NULL\\n \.\.\$ axis\.minor\.ticks\.length\.y : NULL\\n \.\.\$ axis\.minor\.ticks\.length\.y\.left : NULL\\n \.\.\$ axis\.minor\.ticks\.length\.y\.right : NULL\\n \.\.\$ axis\.minor\.ticks\.length\.theta : NULL\\n \.\.\$ axis\.minor\.ticks\.length\.r : NULL\\n \.\.\$ axis\.line : list\(\)\\n \.\. \.\.- attr\(\*, "class"\)= chr \[1:2\] "element_blank" "element"\\n \.\.\$ axis\.line\.x : NULL\\n \.\.\$ axis\.line\.x\.top : NULL\\n \.\.\$ axis\.line\.x\.bottom : NULL\\n \.\.\$ axis\.line\.y : NULL\\n \.\.\$ axis\.line\.y\.left : NULL\\n \.\.\$ axis\.line\.y\.right : NULL\\n \.\.\$ axis\.line\.theta : NULL\\n \.\.\$ axis\.line\.r : NULL\\n \.\.\$ legend\.background :List of 5\\n \.\. \.\.\$ fill : NULL\\n \.\. \.\.\$ colour : logi NA\\n \.\. \.\.\$ linewidth : NULL\\n \.\. \.\.\$ linetype : NULL\\n \.\. \.\.\$ inherit\.blank: logi TRUE\\n \.\. \.\.- attr\(\*, "class"\)= chr \[1:2\] "element_rect" "element"\\n \.\.\$ legend\.margin : 'margin' num \[1:4\] 5\.5points 5\.5points 5\.5points 5\.5points\\n \.\. \.\.- attr\(\*, "unit"\)= int 8\\n \.\.\$ legend\.spacing : 'simpleUnit' num 11points\\n \.\. \.\.- attr\(\*, "unit"\)= int 8\\n \.\.\$ legend\.spacing\.x : NULL\\n \.\.\$ legend\.spacing\.y : NULL\\n \.\.\$ legend\.key : NULL\\n \.\.\$ legend\.key\.size : 'simpleUnit' num 1\.2lines\\n \.\. \.\.- attr\(\*, "unit"\)= int 3\\n \.\.\$ legend\.key\.height : NULL\\n \.\.\$ legend\.key\.width : NULL\\n \.\.\$ legend\.key\.spacing : 'simpleUnit' num 5\.5points\\n \.\. \.\.- attr\(\*, "unit"\)= int 8\\n \.\.\$ legend\.key\.spacing\.x : NULL\\n \.\.\$ legend\.key\.spacing\.y : NULL\\n \.\.\$ legend\.frame : NULL\\n \.\.\$ legend\.ticks : NULL\\n \.\.\$ legend\.ticks\.length : 'rel' num 0\.2\\n \.\.\$ legend\.axis\.line : NULL\\n \.\.\$ legend\.text :List of 11\\n \.\. \.\.\$ family : NULL\\n \.\. \.\.\$ face : NULL\\n \.\. \.\.\$ colour : NULL\\n \.\. \.\.\$ size : 'rel' num 0\.8\\n \.\. \.\.\$ hjust : NULL\\n \.\. \.\.\$ vjust : NULL\\n \.\. \.\.\$ angle : NULL\\n \.\. \.\.\$ lineheight : NULL\\n \.\. \.\.\$ margin : NULL\\n \.\. \.\.\$ debug : NULL\\n \.\. \.\.\$ inherit\.blank: logi TRUE\\n \.\. \.\.- attr\(\*, "class"\)= chr \[1:2\] "element_text" "element"\\n \.\.\$ legend\.text\.position : NULL\\n \.\.\$ legend\.title :List of 11\\n \.\. \.\.\$ family : NULL\\n \.\. \.\.\$ face : NULL\\n \.\. \.\.\$ colour : NULL\\n \.\. \.\.\$ size : NULL\\n \.\. \.\.\$ hjust : num 0\\n \.\. \.\.\$ vjust : NULL\\n \.\. \.\.\$ angle : NULL\\n \.\. \.\.\$ lineheight : NULL\\n \.\. \.\.\$ margin : NULL\\n \.\. \.\.\$ debug : NULL\\n \.\. \.\.\$ inherit\.blank: logi TRUE\\n \.\. \.\.- attr\(\*, "class"\)= chr \[1:2\] "element_text" "element"\\n \.\.\$ legend\.title\.position : NULL\\n \.\.\$ legend\.position : chr "none"\\n \.\.\$ legend\.position\.inside : NULL\\n \.\.\$ legend\.direction : NULL\\n \.\.\$ legend\.byrow : NULL\\n \.\.\$ legend\.justification : chr "center"\\n \.\.\$ legend\.justification\.top : NULL\\n \.\.\$ legend\.justification\.bottom : NULL\\n \.\.\$ legend\.justification\.left : NULL\\n \.\.\$ legend\.justification\.right : NULL\\n \.\.\$ legend\.justification\.inside : NULL\\n \.\.\$ legend\.location : NULL\\n \.\.\$ legend\.box : NULL\\n \.\.\$ legend\.box\.just : NULL\\n \.\.\$ legend\.box\.margin : 'margin' num \[1:4\] 0cm 0cm 0cm 0cm\\n \.\. \.\.- attr\(\*, "unit"\)= int 1\\n \.\.\$ legend\.box\.background : list\(\)\\n \.\. \.\.- attr\(\*, "class"\)= chr \[1:2\] "element_blank" "element"\\n \.\.\$ legend\.box\.spacing : 'simpleUnit' num 11points\\n \.\. \.\.- attr\(\*, "unit"\)= int 8\\n \.\. \[list output truncated\]\\n \.\.- attr\(\*, "class"\)= chr \[1:2\] "theme" "gg"\\n \.\.- attr\(\*, "complete"\)= logi TRUE\\n \.\.- attr\(\*, "validate"\)= logi TRUE\\n \$ coordinates:Classes 'CoordCartesian', 'Coord', 'ggproto', 'gg' \\n aspect: function\\n backtransform_range: function\\n clip: on\\n default: TRUE\\n distance: function\\n expand: TRUE\\n is_free: function\\n is_linear: function\\n labels: function\\n limits: list\\n modify_scales: function\\n range: function\\n render_axis_h: function\\n render_axis_v: function\\n render_bg: function\\n render_fg: function\\n setup_data: function\\n setup_layout: function\\n setup_panel_guides: function\\n setup_panel_params: function\\n setup_params: function\\n train_panel_guides: function\\n transform: function\\n super: \\n \$ facet :Classes 'FacetNull', 'Facet', 'ggproto', 'gg' \\n compute_layout: function\\n draw_back: function\\n draw_front: function\\n draw_labels: function\\n draw_panels: function\\n finish_data: function\\n init_scales: function\\n map_data: function\\n params: list\\n setup_data: function\\n setup_params: function\\n shrink: TRUE\\n train_scales: function\\n vars: function\\n super: \\n \$ plot_env : \\n \$ layout :Classes 'Layout', 'ggproto', 'gg' \\n coord: NULL\\n coord_params: list\\n facet: NULL\\n facet_params: list\\n finish_data: function\\n get_scales: function\\n layout: NULL\\n map_position: function\\n panel_params: NULL\\n panel_scales_x: NULL\\n panel_scales_y: NULL\\n render: function\\n render_labels: function\\n reset_scales: function\\n resolve_label: function\\n setup: function\\n setup_panel_guides: function\\n setup_panel_params: function\\n train_position: function\\n super: \\n \$ labels :List of 2\\n \.\.\$ y: chr "Assignment accuracy"\\n \.\.\$ x: chr "Proportion of individuals used in training set"\\n - attr\(\*, "class"\)= chr \[1:2\] "gg" "ggplot"" Backtrace: ▆ 1. └─testthat::expect_output(str(plot), "List of 9") at test_accuracy.R:8:3 2. └─testthat::expect_match(...) 3. └─testthat:::expect_match_(...) ── Failure ('test_accuracy.R:18:3'): Calculate assignment accuracy for K-fold results ── `str\(plot\)` does not match "List of 9". Actual value: "List of 11\\n \$ data :'data\.frame':\\t3 obs\. of 7 variables:\\n \.\.\$ KF : Factor w/ 1 level "3": 1 1 1\\n \.\.\$ fold : Factor w/ 3 levels "1","2","3": 1 2 3\\n \.\.\$ train\.loci : Factor w/ 1 level "1": 1 1 1\\n \.\.\$ assign\.rate\.all : num \[1:3\] 0\.125 0 0\.429\\n \.\.\$ assign\.rate\.pop\.1: num \[1:3\] 0\.333 0 1\\n \.\.\$ assign\.rate\.pop\.2: num \[1:3\] 0 0 0\.333\\n \.\.\$ assign\.rate\.pop\.3: num \[1:3\] 0 0 0\\n \$ layers :List of 1\\n \.\.\$ :Classes 'LayerInstance', 'Layer', 'ggproto', 'gg' \\n aes_params: list\\n compute_aesthetics: function\\n compute_geom_1: function\\n compute_geom_2: function\\n compute_position: function\\n compute_statistic: function\\n computed_geom_params: NULL\\n computed_mapping: NULL\\n computed_stat_params: NULL\\n constructor: call\\n data: waiver\\n draw_geom: function\\n finish_statistics: function\\n geom: \\n aesthetics: function\\n default_aes: uneval\\n draw_group: function\\n draw_key: function\\n draw_layer: function\\n draw_panel: function\\n extra_params: na\.rm width orientation outliers\\n handle_na: function\\n non_missing_aes: \\n optional_aes: \\n parameters: function\\n rename_size: TRUE\\n required_aes: x\|y lower\|xlower upper\|xupper middle\|xmiddle ymin\|xmin y \.\.\.\\n setup_data: function\\n setup_params: function\\n use_defaults: function\\n super: \\n geom_params: list\\n inherit\.aes: TRUE\\n layer_data: function\\n map_statistic: function\\n mapping: NULL\\n position: \\n compute_layer: function\\n compute_panel: function\\n padding: 0\.1\\n preserve: total\\n required_aes: \\n reverse: FALSE\\n setup_data: function\\n setup_params: function\\n width: NULL\\n super: \\n print: function\\n setup_layer: function\\n show\.legend: NA\\n stat: \\n aesthetics: function\\n compute_group: function\\n compute_layer: function\\n compute_panel: function\\n default_aes: uneval\\n dropped_aes: x y weight\\n extra_params: na\.rm orientation\\n finish_layer: function\\n non_missing_aes: weight\\n optional_aes: \\n parameters: function\\n required_aes: y\|x\\n retransform: TRUE\\n setup_data: function\\n setup_params: function\\n super: \\n stat_params: list\\n super: \\n \$ scales :Classes 'ScalesList', 'ggproto', 'gg' \\n add: function\\n add_defaults: function\\n add_missing: function\\n backtransform_df: function\\n clone: function\\n find: function\\n get_scales: function\\n has_scale: function\\n input: function\\n map_df: function\\n n: function\\n non_position_scales: function\\n scales: list\\n train_df: function\\n transform_df: function\\n super: \\n \$ guides :Classes 'Guides', 'ggproto', 'gg' \\n add: function\\n assemble: function\\n build: function\\n draw: function\\n get_custom: function\\n get_guide: function\\n get_params: function\\n get_position: function\\n guides: NULL\\n merge: function\\n missing: \\n add_title: function\\n arrange_layout: function\\n assemble_drawing: function\\n available_aes: any\\n build_decor: function\\n build_labels: function\\n build_ticks: function\\n build_title: function\\n draw: function\\n draw_early_exit: function\\n elements: list\\n extract_decor: function\\n extract_key: function\\n extract_params: function\\n get_layer_key: function\\n hashables: list\\n measure_grobs: function\\n merge: function\\n override_elements: function\\n params: list\\n process_layers: function\\n setup_elements: function\\n setup_params: function\\n train: function\\n transform: function\\n super: \\n package_box: function\\n print: function\\n process_layers: function\\n setup: function\\n subset_guides: function\\n train: function\\n update_params: function\\n super: \\n \$ mapping :List of 2\\n \.\.\$ x: language ~\.data\[\["KF"\]\]\\n \.\. \.\.- attr\(\*, "\.Environment"\)= \\n \.\.\$ y: language ~col\\n \.\. \.\.- attr\(\*, "\.Environment"\)= \\n \.\.- attr\(\*, "class"\)= chr "uneval"\\n \$ theme :List of 136\\n \.\.\$ line :List of 6\\n \.\. \.\.\$ colour : chr "black"\\n \.\. \.\.\$ linewidth : num 0\.5\\n \.\. \.\.\$ linetype : num 1\\n \.\. \.\.\$ lineend : chr "butt"\\n \.\. \.\.\$ arrow : logi FALSE\\n \.\. \.\.\$ inherit\.blank: logi TRUE\\n \.\. \.\.- attr\(\*, "class"\)= chr \[1:2\] "element_line" "element"\\n \.\.\$ rect :List of 5\\n \.\. \.\.\$ fill : chr "white"\\n \.\. \.\.\$ colour : chr "black"\\n \.\. \.\.\$ linewidth : num 0\.5\\n \.\. \.\.\$ linetype : num 1\\n \.\. \.\.\$ inherit\.blank: logi TRUE\\n \.\. \.\.- attr\(\*, "class"\)= chr \[1:2\] "element_rect" "element"\\n \.\.\$ text :List of 11\\n \.\. \.\.\$ family : chr ""\\n \.\. \.\.\$ face : chr "plain"\\n \.\. \.\.\$ colour : chr "black"\\n \.\. \.\.\$ size : num 11\\n \.\. \.\.\$ hjust : num 0\.5\\n \.\. \.\.\$ vjust : num 0\.5\\n \.\. \.\.\$ angle : num 0\\n \.\. \.\.\$ lineheight : num 0\.9\\n \.\. \.\.\$ margin : 'margin' num \[1:4\] 0points 0points 0points 0points\\n \.\. \.\. \.\.- attr\(\*, "unit"\)= int 8\\n \.\. \.\.\$ debug : logi FALSE\\n \.\. \.\.\$ inherit\.blank: logi TRUE\\n \.\. \.\.- attr\(\*, "class"\)= chr \[1:2\] "element_text" "element"\\n \.\.\$ title : NULL\\n \.\.\$ aspect\.ratio : NULL\\n \.\.\$ axis\.title : NULL\\n \.\.\$ axis\.title\.x :List of 11\\n \.\. \.\.\$ family : NULL\\n \.\. \.\.\$ face : NULL\\n \.\. \.\.\$ colour : NULL\\n \.\. \.\.\$ size : NULL\\n \.\. \.\.\$ hjust : NULL\\n \.\. \.\.\$ vjust : num 1\\n \.\. \.\.\$ angle : NULL\\n \.\. \.\.\$ lineheight : NULL\\n \.\. \.\.\$ margin : 'margin' num \[1:4\] 2\.75points 0points 0points 0points\\n \.\. \.\. \.\.- attr\(\*, "unit"\)= int 8\\n \.\. \.\.\$ debug : NULL\\n \.\. \.\.\$ inherit\.blank: logi TRUE\\n \.\. \.\.- attr\(\*, "class"\)= chr \[1:2\] "element_text" "element"\\n \.\.\$ axis\.title\.x\.top :List of 11\\n \.\. \.\.\$ family : NULL\\n \.\. \.\.\$ face : NULL\\n \.\. \.\.\$ colour : NULL\\n \.\. \.\.\$ size : NULL\\n \.\. \.\.\$ hjust : NULL\\n \.\. \.\.\$ vjust : num 0\\n \.\. \.\.\$ angle : NULL\\n \.\. \.\.\$ lineheight : NULL\\n \.\. \.\.\$ margin : 'margin' num \[1:4\] 0points 0points 2\.75points 0points\\n \.\. \.\. \.\.- attr\(\*, "unit"\)= int 8\\n \.\. \.\.\$ debug : NULL\\n \.\. \.\.\$ inherit\.blank: logi TRUE\\n \.\. \.\.- attr\(\*, "class"\)= chr \[1:2\] "element_text" "element"\\n \.\.\$ axis\.title\.x\.bottom : NULL\\n \.\.\$ axis\.title\.y :List of 11\\n \.\. \.\.\$ family : NULL\\n \.\. \.\.\$ face : NULL\\n \.\. \.\.\$ colour : NULL\\n \.\. \.\.\$ size : NULL\\n \.\. \.\.\$ hjust : NULL\\n \.\. \.\.\$ vjust : num 1\\n \.\. \.\.\$ angle : num 90\\n \.\. \.\.\$ lineheight : NULL\\n \.\. \.\.\$ margin : 'margin' num \[1:4\] 0points 2\.75points 0points 0points\\n \.\. \.\. \.\.- attr\(\*, "unit"\)= int 8\\n \.\. \.\.\$ debug : NULL\\n \.\. \.\.\$ inherit\.blank: logi TRUE\\n \.\. \.\.- attr\(\*, "class"\)= chr \[1:2\] "element_text" "element"\\n \.\.\$ axis\.title\.y\.left : NULL\\n \.\.\$ axis\.title\.y\.right :List of 11\\n \.\. \.\.\$ family : NULL\\n \.\. \.\.\$ face : NULL\\n \.\. \.\.\$ colour : NULL\\n \.\. \.\.\$ size : NULL\\n \.\. \.\.\$ hjust : NULL\\n \.\. \.\.\$ vjust : num 1\\n \.\. \.\.\$ angle : num -90\\n \.\. \.\.\$ lineheight : NULL\\n \.\. \.\.\$ margin : 'margin' num \[1:4\] 0points 0points 0points 2\.75points\\n \.\. \.\. \.\.- attr\(\*, "unit"\)= int 8\\n \.\. \.\.\$ debug : NULL\\n \.\. \.\.\$ inherit\.blank: logi TRUE\\n \.\. \.\.- attr\(\*, "class"\)= chr \[1:2\] "element_text" "element"\\n \.\.\$ axis\.text :List of 11\\n \.\. \.\.\$ family : NULL\\n \.\. \.\.\$ face : NULL\\n \.\. \.\.\$ colour : chr "grey30"\\n \.\. \.\.\$ size : 'rel' num 0\.8\\n \.\. \.\.\$ hjust : NULL\\n \.\. \.\.\$ vjust : NULL\\n \.\. \.\.\$ angle : NULL\\n \.\. \.\.\$ lineheight : NULL\\n \.\. \.\.\$ margin : NULL\\n \.\. \.\.\$ debug : NULL\\n \.\. \.\.\$ inherit\.blank: logi TRUE\\n \.\. \.\.- attr\(\*, "class"\)= chr \[1:2\] "element_text" "element"\\n \.\.\$ axis\.text\.x :List of 11\\n \.\. \.\.\$ family : NULL\\n \.\. \.\.\$ face : NULL\\n \.\. \.\.\$ colour : NULL\\n \.\. \.\.\$ size : NULL\\n \.\. \.\.\$ hjust : NULL\\n \.\. \.\.\$ vjust : num 1\\n \.\. \.\.\$ angle : NULL\\n \.\. \.\.\$ lineheight : NULL\\n \.\. \.\.\$ margin : 'margin' num \[1:4\] 2\.2points 0points 0points 0points\\n \.\. \.\. \.\.- attr\(\*, "unit"\)= int 8\\n \.\. \.\.\$ debug : NULL\\n \.\. \.\.\$ inherit\.blank: logi TRUE\\n \.\. \.\.- attr\(\*, "class"\)= chr \[1:2\] "element_text" "element"\\n \.\.\$ axis\.text\.x\.top :List of 11\\n \.\. \.\.\$ family : NULL\\n \.\. \.\.\$ face : NULL\\n \.\. \.\.\$ colour : NULL\\n \.\. \.\.\$ size : NULL\\n \.\. \.\.\$ hjust : NULL\\n \.\. \.\.\$ vjust : num 0\\n \.\. \.\.\$ angle : NULL\\n \.\. \.\.\$ lineheight : NULL\\n \.\. \.\.\$ margin : 'margin' num \[1:4\] 0points 0points 2\.2points 0points\\n \.\. \.\. \.\.- attr\(\*, "unit"\)= int 8\\n \.\. \.\.\$ debug : NULL\\n \.\. \.\.\$ inherit\.blank: logi TRUE\\n \.\. \.\.- attr\(\*, "class"\)= chr \[1:2\] "element_text" "element"\\n \.\.\$ axis\.text\.x\.bottom : NULL\\n \.\.\$ axis\.text\.y :List of 11\\n \.\. \.\.\$ family : NULL\\n \.\. \.\.\$ face : NULL\\n \.\. \.\.\$ colour : NULL\\n \.\. \.\.\$ size : NULL\\n \.\. \.\.\$ hjust : num 1\\n \.\. \.\.\$ vjust : NULL\\n \.\. \.\.\$ angle : NULL\\n \.\. \.\.\$ lineheight : NULL\\n \.\. \.\.\$ margin : 'margin' num \[1:4\] 0points 2\.2points 0points 0points\\n \.\. \.\. \.\.- attr\(\*, "unit"\)= int 8\\n \.\. \.\.\$ debug : NULL\\n \.\. \.\.\$ inherit\.blank: logi TRUE\\n \.\. \.\.- attr\(\*, "class"\)= chr \[1:2\] "element_text" "element"\\n \.\.\$ axis\.text\.y\.left : NULL\\n \.\.\$ axis\.text\.y\.right :List of 11\\n \.\. \.\.\$ family : NULL\\n \.\. \.\.\$ face : NULL\\n \.\. \.\.\$ colour : NULL\\n \.\. \.\.\$ size : NULL\\n \.\. \.\.\$ hjust : num 0\\n \.\. \.\.\$ vjust : NULL\\n \.\. \.\.\$ angle : NULL\\n \.\. \.\.\$ lineheight : NULL\\n \.\. \.\.\$ margin : 'margin' num \[1:4\] 0points 0points 0points 2\.2points\\n \.\. \.\. \.\.- attr\(\*, "unit"\)= int 8\\n \.\. \.\.\$ debug : NULL\\n \.\. \.\.\$ inherit\.blank: logi TRUE\\n \.\. \.\.- attr\(\*, "class"\)= chr \[1:2\] "element_text" "element"\\n \.\.\$ axis\.text\.theta : NULL\\n \.\.\$ axis\.text\.r :List of 11\\n \.\. \.\.\$ family : NULL\\n \.\. \.\.\$ face : NULL\\n \.\. \.\.\$ colour : NULL\\n \.\. \.\.\$ size : NULL\\n \.\. \.\.\$ hjust : num 0\.5\\n \.\. \.\.\$ vjust : NULL\\n \.\. \.\.\$ angle : NULL\\n \.\. \.\.\$ lineheight : NULL\\n \.\. \.\.\$ margin : 'margin' num \[1:4\] 0points 2\.2points 0points 2\.2points\\n \.\. \.\. \.\.- attr\(\*, "unit"\)= int 8\\n \.\. \.\.\$ debug : NULL\\n \.\. \.\.\$ inherit\.blank: logi TRUE\\n \.\. \.\.- attr\(\*, "class"\)= chr \[1:2\] "element_text" "element"\\n \.\.\$ axis\.ticks :List of 6\\n \.\. \.\.\$ colour : chr "grey20"\\n \.\. \.\.\$ linewidth : NULL\\n \.\. \.\.\$ linetype : NULL\\n \.\. \.\.\$ lineend : NULL\\n \.\. \.\.\$ arrow : logi FALSE\\n \.\. \.\.\$ inherit\.blank: logi TRUE\\n \.\. \.\.- attr\(\*, "class"\)= chr \[1:2\] "element_line" "element"\\n \.\.\$ axis\.ticks\.x : NULL\\n \.\.\$ axis\.ticks\.x\.top : NULL\\n \.\.\$ axis\.ticks\.x\.bottom : NULL\\n \.\.\$ axis\.ticks\.y : NULL\\n \.\.\$ axis\.ticks\.y\.left : NULL\\n \.\.\$ axis\.ticks\.y\.right : NULL\\n \.\.\$ axis\.ticks\.theta : NULL\\n \.\.\$ axis\.ticks\.r : NULL\\n \.\.\$ axis\.minor\.ticks\.x\.top : NULL\\n \.\.\$ axis\.minor\.ticks\.x\.bottom : NULL\\n \.\.\$ axis\.minor\.ticks\.y\.left : NULL\\n \.\.\$ axis\.minor\.ticks\.y\.right : NULL\\n \.\.\$ axis\.minor\.ticks\.theta : NULL\\n \.\.\$ axis\.minor\.ticks\.r : NULL\\n \.\.\$ axis\.ticks\.length : 'simpleUnit' num 2\.75points\\n \.\. \.\.- attr\(\*, "unit"\)= int 8\\n \.\.\$ axis\.ticks\.length\.x : NULL\\n \.\.\$ axis\.ticks\.length\.x\.top : NULL\\n \.\.\$ axis\.ticks\.length\.x\.bottom : NULL\\n \.\.\$ axis\.ticks\.length\.y : NULL\\n \.\.\$ axis\.ticks\.length\.y\.left : NULL\\n \.\.\$ axis\.ticks\.length\.y\.right : NULL\\n \.\.\$ axis\.ticks\.length\.theta : NULL\\n \.\.\$ axis\.ticks\.length\.r : NULL\\n \.\.\$ axis\.minor\.ticks\.length : 'rel' num 0\.75\\n \.\.\$ axis\.minor\.ticks\.length\.x : NULL\\n \.\.\$ axis\.minor\.ticks\.length\.x\.top : NULL\\n \.\.\$ axis\.minor\.ticks\.length\.x\.bottom: NULL\\n \.\.\$ axis\.minor\.ticks\.length\.y : NULL\\n \.\.\$ axis\.minor\.ticks\.length\.y\.left : NULL\\n \.\.\$ axis\.minor\.ticks\.length\.y\.right : NULL\\n \.\.\$ axis\.minor\.ticks\.length\.theta : NULL\\n \.\.\$ axis\.minor\.ticks\.length\.r : NULL\\n \.\.\$ axis\.line : list\(\)\\n \.\. \.\.- attr\(\*, "class"\)= chr \[1:2\] "element_blank" "element"\\n \.\.\$ axis\.line\.x : NULL\\n \.\.\$ axis\.line\.x\.top : NULL\\n \.\.\$ axis\.line\.x\.bottom : NULL\\n \.\.\$ axis\.line\.y : NULL\\n \.\.\$ axis\.line\.y\.left : NULL\\n \.\.\$ axis\.line\.y\.right : NULL\\n \.\.\$ axis\.line\.theta : NULL\\n \.\.\$ axis\.line\.r : NULL\\n \.\.\$ legend\.background :List of 5\\n \.\. \.\.\$ fill : NULL\\n \.\. \.\.\$ colour : logi NA\\n \.\. \.\.\$ linewidth : NULL\\n \.\. \.\.\$ linetype : NULL\\n \.\. \.\.\$ inherit\.blank: logi TRUE\\n \.\. \.\.- attr\(\*, "class"\)= chr \[1:2\] "element_rect" "element"\\n \.\.\$ legend\.margin : 'margin' num \[1:4\] 5\.5points 5\.5points 5\.5points 5\.5points\\n \.\. \.\.- attr\(\*, "unit"\)= int 8\\n \.\.\$ legend\.spacing : 'simpleUnit' num 11points\\n \.\. \.\.- attr\(\*, "unit"\)= int 8\\n \.\.\$ legend\.spacing\.x : NULL\\n \.\.\$ legend\.spacing\.y : NULL\\n \.\.\$ legend\.key : NULL\\n \.\.\$ legend\.key\.size : 'simpleUnit' num 1\.2lines\\n \.\. \.\.- attr\(\*, "unit"\)= int 3\\n \.\.\$ legend\.key\.height : NULL\\n \.\.\$ legend\.key\.width : NULL\\n \.\.\$ legend\.key\.spacing : 'simpleUnit' num 5\.5points\\n \.\. \.\.- attr\(\*, "unit"\)= int 8\\n \.\.\$ legend\.key\.spacing\.x : NULL\\n \.\.\$ legend\.key\.spacing\.y : NULL\\n \.\.\$ legend\.frame : NULL\\n \.\.\$ legend\.ticks : NULL\\n \.\.\$ legend\.ticks\.length : 'rel' num 0\.2\\n \.\.\$ legend\.axis\.line : NULL\\n \.\.\$ legend\.text :List of 11\\n \.\. \.\.\$ family : NULL\\n \.\. \.\.\$ face : NULL\\n \.\. \.\.\$ colour : NULL\\n \.\. \.\.\$ size : 'rel' num 0\.8\\n \.\. \.\.\$ hjust : NULL\\n \.\. \.\.\$ vjust : NULL\\n \.\. \.\.\$ angle : NULL\\n \.\. \.\.\$ lineheight : NULL\\n \.\. \.\.\$ margin : NULL\\n \.\. \.\.\$ debug : NULL\\n \.\. \.\.\$ inherit\.blank: logi TRUE\\n \.\. \.\.- attr\(\*, "class"\)= chr \[1:2\] "element_text" "element"\\n \.\.\$ legend\.text\.position : NULL\\n \.\.\$ legend\.title :List of 11\\n \.\. \.\.\$ family : NULL\\n \.\. \.\.\$ face : NULL\\n \.\. \.\.\$ colour : NULL\\n \.\. \.\.\$ size : NULL\\n \.\. \.\.\$ hjust : num 0\\n \.\. \.\.\$ vjust : NULL\\n \.\. \.\.\$ angle : NULL\\n \.\. \.\.\$ lineheight : NULL\\n \.\. \.\.\$ margin : NULL\\n \.\. \.\.\$ debug : NULL\\n \.\. \.\.\$ inherit\.blank: logi TRUE\\n \.\. \.\.- attr\(\*, "class"\)= chr \[1:2\] "element_text" "element"\\n \.\.\$ legend\.title\.position : NULL\\n \.\.\$ legend\.position : chr "none"\\n \.\.\$ legend\.position\.inside : NULL\\n \.\.\$ legend\.direction : NULL\\n \.\.\$ legend\.byrow : NULL\\n \.\.\$ legend\.justification : chr "center"\\n \.\.\$ legend\.justification\.top : NULL\\n \.\.\$ legend\.justification\.bottom : NULL\\n \.\.\$ legend\.justification\.left : NULL\\n \.\.\$ legend\.justification\.right : NULL\\n \.\.\$ legend\.justification\.inside : NULL\\n \.\.\$ legend\.location : NULL\\n \.\.\$ legend\.box : NULL\\n \.\.\$ legend\.box\.just : NULL\\n \.\.\$ legend\.box\.margin : 'margin' num \[1:4\] 0cm 0cm 0cm 0cm\\n \.\. \.\.- attr\(\*, "unit"\)= int 1\\n \.\.\$ legend\.box\.background : list\(\)\\n \.\. \.\.- attr\(\*, "class"\)= chr \[1:2\] "element_blank" "element"\\n \.\.\$ legend\.box\.spacing : 'simpleUnit' num 11points\\n \.\. \.\.- attr\(\*, "unit"\)= int 8\\n \.\. \[list output truncated\]\\n \.\.- attr\(\*, "class"\)= chr \[1:2\] "theme" "gg"\\n \.\.- attr\(\*, "complete"\)= logi TRUE\\n \.\.- attr\(\*, "validate"\)= logi TRUE\\n \$ coordinates:Classes 'CoordCartesian', 'Coord', 'ggproto', 'gg' \\n aspect: function\\n backtransform_range: function\\n clip: on\\n default: TRUE\\n distance: function\\n expand: TRUE\\n is_free: function\\n is_linear: function\\n labels: function\\n limits: list\\n modify_scales: function\\n range: function\\n render_axis_h: function\\n render_axis_v: function\\n render_bg: function\\n render_fg: function\\n setup_data: function\\n setup_layout: function\\n setup_panel_guides: function\\n setup_panel_params: function\\n setup_params: function\\n train_panel_guides: function\\n transform: function\\n super: \\n \$ facet :Classes 'FacetNull', 'Facet', 'ggproto', 'gg' \\n compute_layout: function\\n draw_back: function\\n draw_front: function\\n draw_labels: function\\n draw_panels: function\\n finish_data: function\\n init_scales: function\\n map_data: function\\n params: list\\n setup_data: function\\n setup_params: function\\n shrink: TRUE\\n train_scales: function\\n vars: function\\n super: \\n \$ plot_env : \\n \$ layout :Classes 'Layout', 'ggproto', 'gg' \\n coord: NULL\\n coord_params: list\\n facet: NULL\\n facet_params: list\\n finish_data: function\\n get_scales: function\\n layout: NULL\\n map_position: function\\n panel_params: NULL\\n panel_scales_x: NULL\\n panel_scales_y: NULL\\n render: function\\n render_labels: function\\n reset_scales: function\\n resolve_label: function\\n setup: function\\n setup_panel_guides: function\\n setup_panel_params: function\\n train_position: function\\n super: \\n \$ labels :List of 2\\n \.\.\$ y: chr "Assignment accuracy"\\n \.\.\$ x: chr "K"\\n - attr\(\*, "class"\)= chr \[1:2\] "gg" "ggplot"" Backtrace: ▆ 1. └─testthat::expect_output(str(plot), "List of 9") at test_accuracy.R:18:3 2. └─testthat::expect_match(...) 3. └─testthat:::expect_match_(...) ── Failure ('test_membership.R:5:3'): Plot membership probability ────────────── `str\(plot\)` does not match "List of 10". Actual value: "List of 11\\n \$ data :'data\.frame':\\t72 obs\. of 6 variables:\\n \.\.\$ Ind\.ID : Factor w/ 24 levels "A10","A12","AA9",\.\.: 3 1 2 5 6 4 7 8 11 9 \.\.\.\\n \.\.\$ origin\.pop: Factor w/ 3 levels "pop\.1","pop\.2",\.\.: 1 1 1 2 2 2 3 3 1 1 \.\.\.\\n \.\.\$ pred\.pop : Factor w/ 3 levels "pop\.1","pop\.3",\.\.: 1 2 2 1 1 1 1 1 2 2 \.\.\.\\n \.\.\$ fold_n : chr \[1:72\] "fold_1" "fold_1" "fold_1" "fold_1" \.\.\.\\n \.\.\$ variable : Factor w/ 3 levels "pop\.1","pop\.2",\.\.: 1 1 1 1 1 1 1 1 1 1 \.\.\.\\n \.\.\$ value : num \[1:72\] 0\.4 0\.326 0\.26 0\.383 0\.44 \.\.\.\\n \$ layers :List of 1\\n \.\.\$ :Classes 'LayerInstance', 'Layer', 'ggproto', 'gg' \\n aes_params: list\\n compute_aesthetics: function\\n compute_geom_1: function\\n compute_geom_2: function\\n compute_position: function\\n compute_statistic: function\\n computed_geom_params: NULL\\n computed_mapping: NULL\\n computed_stat_params: NULL\\n constructor: call\\n data: waiver\\n draw_geom: function\\n finish_statistics: function\\n geom: \\n aesthetics: function\\n default_aes: uneval\\n draw_group: function\\n draw_key: function\\n draw_layer: function\\n draw_panel: function\\n extra_params: just na\.rm orientation\\n handle_na: function\\n non_missing_aes: xmin xmax ymin ymax\\n optional_aes: \\n parameters: function\\n rename_size: TRUE\\n required_aes: x y\\n setup_data: function\\n setup_params: function\\n use_defaults: function\\n super: \\n geom_params: list\\n inherit\.aes: TRUE\\n layer_data: function\\n map_statistic: function\\n mapping: NULL\\n position: \\n compute_layer: function\\n compute_panel: function\\n fill: FALSE\\n required_aes: \\n reverse: FALSE\\n setup_data: function\\n setup_params: function\\n type: NULL\\n vjust: 1\\n super: \\n print: function\\n setup_layer: function\\n show\.legend: NA\\n stat: \\n aesthetics: function\\n compute_group: function\\n compute_layer: function\\n compute_panel: function\\n default_aes: uneval\\n dropped_aes: \\n extra_params: na\.rm\\n finish_layer: function\\n non_missing_aes: \\n optional_aes: \\n parameters: function\\n required_aes: \\n retransform: TRUE\\n setup_data: function\\n setup_params: function\\n super: \\n stat_params: list\\n super: \\n \$ scales :Classes 'ScalesList', 'ggproto', 'gg' \\n add: function\\n add_defaults: function\\n add_missing: function\\n backtransform_df: function\\n clone: function\\n find: function\\n get_scales: function\\n has_scale: function\\n input: function\\n map_df: function\\n n: function\\n non_position_scales: function\\n scales: list\\n train_df: function\\n transform_df: function\\n super: \\n \$ guides :Classes 'Guides', 'ggproto', 'gg' \\n add: function\\n assemble: function\\n build: function\\n draw: function\\n get_custom: function\\n get_guide: function\\n get_params: function\\n get_position: function\\n guides: list\\n merge: function\\n missing: \\n add_title: function\\n arrange_layout: function\\n assemble_drawing: function\\n available_aes: any\\n build_decor: function\\n build_labels: function\\n build_ticks: function\\n build_title: function\\n draw: function\\n draw_early_exit: function\\n elements: list\\n extract_decor: function\\n extract_key: function\\n extract_params: function\\n get_layer_key: function\\n hashables: list\\n measure_grobs: function\\n merge: function\\n override_elements: function\\n params: list\\n process_layers: function\\n setup_elements: function\\n setup_params: function\\n train: function\\n transform: function\\n super: \\n package_box: function\\n print: function\\n process_layers: function\\n setup: function\\n subset_guides: function\\n train: function\\n update_params: function\\n super: \\n \$ mapping :List of 3\\n \.\.\$ x : language ~Ind\.ID\\n \.\. \.\.- attr\(\*, "\.Environment"\)= \\n \.\.\$ y : language ~value\\n \.\. \.\.- attr\(\*, "\.Environment"\)= \\n \.\.\$ fill: language ~variable\\n \.\. \.\.- attr\(\*, "\.Environment"\)= \\n \.\.- attr\(\*, "class"\)= chr "uneval"\\n \$ theme :List of 136\\n \.\.\$ line :List of 6\\n \.\. \.\.\$ colour : chr "black"\\n \.\. \.\.\$ linewidth : num 0\.5\\n \.\. \.\.\$ linetype : num 1\\n \.\. \.\.\$ lineend : chr "butt"\\n \.\. \.\.\$ arrow : logi FALSE\\n \.\. \.\.\$ inherit\.blank: logi TRUE\\n \.\. \.\.- attr\(\*, "class"\)= chr \[1:2\] "element_line" "element"\\n \.\.\$ rect :List of 5\\n \.\. \.\.\$ fill : chr "white"\\n \.\. \.\.\$ colour : chr "black"\\n \.\. \.\.\$ linewidth : num 0\.5\\n \.\. \.\.\$ linetype : num 1\\n \.\. \.\.\$ inherit\.blank: logi TRUE\\n \.\. \.\.- attr\(\*, "class"\)= chr \[1:2\] "element_rect" "element"\\n \.\.\$ text :List of 11\\n \.\. \.\.\$ family : chr ""\\n \.\. \.\.\$ face : chr "plain"\\n \.\. \.\.\$ colour : chr "black"\\n \.\. \.\.\$ size : num 11\\n \.\. \.\.\$ hjust : num 0\.5\\n \.\. \.\.\$ vjust : num 0\.5\\n \.\. \.\.\$ angle : num 0\\n \.\. \.\.\$ lineheight : num 0\.9\\n \.\. \.\.\$ margin : 'margin' num \[1:4\] 0points 0points 0points 0points\\n \.\. \.\. \.\.- attr\(\*, "unit"\)= int 8\\n \.\. \.\.\$ debug : logi FALSE\\n \.\. \.\.\$ inherit\.blank: logi TRUE\\n \.\. \.\.- attr\(\*, "class"\)= chr \[1:2\] "element_text" "element"\\n \.\.\$ title : NULL\\n \.\.\$ aspect\.ratio : NULL\\n \.\.\$ axis\.title : NULL\\n \.\.\$ axis\.title\.x : list\(\)\\n \.\. \.\.- attr\(\*, "class"\)= chr \[1:2\] "element_blank" "element"\\n \.\.\$ axis\.title\.x\.top :List of 11\\n \.\. \.\.\$ family : NULL\\n \.\. \.\.\$ face : NULL\\n \.\. \.\.\$ colour : NULL\\n \.\. \.\.\$ size : NULL\\n \.\. \.\.\$ hjust : NULL\\n \.\. \.\.\$ vjust : num 0\\n \.\. \.\.\$ angle : NULL\\n \.\. \.\.\$ lineheight : NULL\\n \.\. \.\.\$ margin : 'margin' num \[1:4\] 0points 0points 2\.75points 0points\\n \.\. \.\. \.\.- attr\(\*, "unit"\)= int 8\\n \.\. \.\.\$ debug : NULL\\n \.\. \.\.\$ inherit\.blank: logi TRUE\\n \.\. \.\.- attr\(\*, "class"\)= chr \[1:2\] "element_text" "element"\\n \.\.\$ axis\.title\.x\.bottom : NULL\\n \.\.\$ axis\.title\.y :List of 11\\n \.\. \.\.\$ family : NULL\\n \.\. \.\.\$ face : NULL\\n \.\. \.\.\$ colour : NULL\\n \.\. \.\.\$ size : NULL\\n \.\. \.\.\$ hjust : NULL\\n \.\. \.\.\$ vjust : num 1\\n \.\. \.\.\$ angle : num 90\\n \.\. \.\.\$ lineheight : NULL\\n \.\. \.\.\$ margin : 'margin' num \[1:4\] 0points 2\.75points 0points 0points\\n \.\. \.\. \.\.- attr\(\*, "unit"\)= int 8\\n \.\. \.\.\$ debug : NULL\\n \.\. \.\.\$ inherit\.blank: logi TRUE\\n \.\. \.\.- attr\(\*, "class"\)= chr \[1:2\] "element_text" "element"\\n \.\.\$ axis\.title\.y\.left : NULL\\n \.\.\$ axis\.title\.y\.right :List of 11\\n \.\. \.\.\$ family : NULL\\n \.\. \.\.\$ face : NULL\\n \.\. \.\.\$ colour : NULL\\n \.\. \.\.\$ size : NULL\\n \.\. \.\.\$ hjust : NULL\\n \.\. \.\.\$ vjust : num 1\\n \.\. \.\.\$ angle : num -90\\n \.\. \.\.\$ lineheight : NULL\\n \.\. \.\.\$ margin : 'margin' num \[1:4\] 0points 0points 0points 2\.75points\\n \.\. \.\. \.\.- attr\(\*, "unit"\)= int 8\\n \.\. \.\.\$ debug : NULL\\n \.\. \.\.\$ inherit\.blank: logi TRUE\\n \.\. \.\.- attr\(\*, "class"\)= chr \[1:2\] "element_text" "element"\\n \.\.\$ axis\.text :List of 11\\n \.\. \.\.\$ family : NULL\\n \.\. \.\.\$ face : NULL\\n \.\. \.\.\$ colour : chr "grey30"\\n \.\. \.\.\$ size : 'rel' num 0\.8\\n \.\. \.\.\$ hjust : NULL\\n \.\. \.\.\$ vjust : NULL\\n \.\. \.\.\$ angle : NULL\\n \.\. \.\.\$ lineheight : NULL\\n \.\. \.\.\$ margin : NULL\\n \.\. \.\.\$ debug : NULL\\n \.\. \.\.\$ inherit\.blank: logi TRUE\\n \.\. \.\.- attr\(\*, "class"\)= chr \[1:2\] "element_text" "element"\\n \.\.\$ axis\.text\.x :List of 11\\n \.\. \.\.\$ family : NULL\\n \.\. \.\.\$ face : NULL\\n \.\. \.\.\$ colour : NULL\\n \.\. \.\.\$ size : NULL\\n \.\. \.\.\$ hjust : NULL\\n \.\. \.\.\$ vjust : num 1\\n \.\. \.\.\$ angle : num 90\\n \.\. \.\.\$ lineheight : NULL\\n \.\. \.\.\$ margin : 'margin' num \[1:4\] 2\.2points 0points 0points 0points\\n \.\. \.\. \.\.- attr\(\*, "unit"\)= int 8\\n \.\. \.\.\$ debug : NULL\\n \.\. \.\.\$ inherit\.blank: logi FALSE\\n \.\. \.\.- attr\(\*, "class"\)= chr \[1:2\] "element_text" "element"\\n \.\.\$ axis\.text\.x\.top :List of 11\\n \.\. \.\.\$ family : NULL\\n \.\. \.\.\$ face : NULL\\n \.\. \.\.\$ colour : NULL\\n \.\. \.\.\$ size : NULL\\n \.\. \.\.\$ hjust : NULL\\n \.\. \.\.\$ vjust : num 0\\n \.\. \.\.\$ angle : NULL\\n \.\. \.\.\$ lineheight : NULL\\n \.\. \.\.\$ margin : 'margin' num \[1:4\] 0points 0points 2\.2points 0points\\n \.\. \.\. \.\.- attr\(\*, "unit"\)= int 8\\n \.\. \.\.\$ debug : NULL\\n \.\. \.\.\$ inherit\.blank: logi TRUE\\n \.\. \.\.- attr\(\*, "class"\)= chr \[1:2\] "element_text" "element"\\n \.\.\$ axis\.text\.x\.bottom : NULL\\n \.\.\$ axis\.text\.y :List of 11\\n \.\. \.\.\$ family : NULL\\n \.\. \.\.\$ face : NULL\\n \.\. \.\.\$ colour : NULL\\n \.\. \.\.\$ size : NULL\\n \.\. \.\.\$ hjust : num 1\\n \.\. \.\.\$ vjust : NULL\\n \.\. \.\.\$ angle : NULL\\n \.\. \.\.\$ lineheight : NULL\\n \.\. \.\.\$ margin : 'margin' num \[1:4\] 0points 2\.2points 0points 0points\\n \.\. \.\. \.\.- attr\(\*, "unit"\)= int 8\\n \.\. \.\.\$ debug : NULL\\n \.\. \.\.\$ inherit\.blank: logi TRUE\\n \.\. \.\.- attr\(\*, "class"\)= chr \[1:2\] "element_text" "element"\\n \.\.\$ axis\.text\.y\.left : NULL\\n \.\.\$ axis\.text\.y\.right :List of 11\\n \.\. \.\.\$ family : NULL\\n \.\. \.\.\$ face : NULL\\n \.\. \.\.\$ colour : NULL\\n \.\. \.\.\$ size : NULL\\n \.\. \.\.\$ hjust : num 0\\n \.\. \.\.\$ vjust : NULL\\n \.\. \.\.\$ angle : NULL\\n \.\. \.\.\$ lineheight : NULL\\n \.\. \.\.\$ margin : 'margin' num \[1:4\] 0points 0points 0points 2\.2points\\n \.\. \.\. \.\.- attr\(\*, "unit"\)= int 8\\n \.\. \.\.\$ debug : NULL\\n \.\. \.\.\$ inherit\.blank: logi TRUE\\n \.\. \.\.- attr\(\*, "class"\)= chr \[1:2\] "element_text" "element"\\n \.\.\$ axis\.text\.theta : NULL\\n \.\.\$ axis\.text\.r :List of 11\\n \.\. \.\.\$ family : NULL\\n \.\. \.\.\$ face : NULL\\n \.\. \.\.\$ colour : NULL\\n \.\. \.\.\$ size : NULL\\n \.\. \.\.\$ hjust : num 0\.5\\n \.\. \.\.\$ vjust : NULL\\n \.\. \.\.\$ angle : NULL\\n \.\. \.\.\$ lineheight : NULL\\n \.\. \.\.\$ margin : 'margin' num \[1:4\] 0points 2\.2points 0points 2\.2points\\n \.\. \.\. \.\.- attr\(\*, "unit"\)= int 8\\n \.\. \.\.\$ debug : NULL\\n \.\. \.\.\$ inherit\.blank: logi TRUE\\n \.\. \.\.- attr\(\*, "class"\)= chr \[1:2\] "element_text" "element"\\n \.\.\$ axis\.ticks :List of 6\\n \.\. \.\.\$ colour : chr "grey20"\\n \.\. \.\.\$ linewidth : NULL\\n \.\. \.\.\$ linetype : NULL\\n \.\. \.\.\$ lineend : NULL\\n \.\. \.\.\$ arrow : logi FALSE\\n \.\. \.\.\$ inherit\.blank: logi TRUE\\n \.\. \.\.- attr\(\*, "class"\)= chr \[1:2\] "element_line" "element"\\n \.\.\$ axis\.ticks\.x : NULL\\n \.\.\$ axis\.ticks\.x\.top : NULL\\n \.\.\$ axis\.ticks\.x\.bottom : NULL\\n \.\.\$ axis\.ticks\.y : NULL\\n \.\.\$ axis\.ticks\.y\.left : NULL\\n \.\.\$ axis\.ticks\.y\.right : NULL\\n \.\.\$ axis\.ticks\.theta : NULL\\n \.\.\$ axis\.ticks\.r : NULL\\n \.\.\$ axis\.minor\.ticks\.x\.top : NULL\\n \.\.\$ axis\.minor\.ticks\.x\.bottom : NULL\\n \.\.\$ axis\.minor\.ticks\.y\.left : NULL\\n \.\.\$ axis\.minor\.ticks\.y\.right : NULL\\n \.\.\$ axis\.minor\.ticks\.theta : NULL\\n \.\.\$ axis\.minor\.ticks\.r : NULL\\n \.\.\$ axis\.ticks\.length : 'simpleUnit' num 2\.75points\\n \.\. \.\.- attr\(\*, "unit"\)= int 8\\n \.\.\$ axis\.ticks\.length\.x : NULL\\n \.\.\$ axis\.ticks\.length\.x\.top : NULL\\n \.\.\$ axis\.ticks\.length\.x\.bottom : NULL\\n \.\.\$ axis\.ticks\.length\.y : NULL\\n \.\.\$ axis\.ticks\.length\.y\.left : NULL\\n \.\.\$ axis\.ticks\.length\.y\.right : NULL\\n \.\.\$ axis\.ticks\.length\.theta : NULL\\n \.\.\$ axis\.ticks\.length\.r : NULL\\n \.\.\$ axis\.minor\.ticks\.length : 'rel' num 0\.75\\n \.\.\$ axis\.minor\.ticks\.length\.x : NULL\\n \.\.\$ axis\.minor\.ticks\.length\.x\.top : NULL\\n \.\.\$ axis\.minor\.ticks\.length\.x\.bottom: NULL\\n \.\.\$ axis\.minor\.ticks\.length\.y : NULL\\n \.\.\$ axis\.minor\.ticks\.length\.y\.left : NULL\\n \.\.\$ axis\.minor\.ticks\.length\.y\.right : NULL\\n \.\.\$ axis\.minor\.ticks\.length\.theta : NULL\\n \.\.\$ axis\.minor\.ticks\.length\.r : NULL\\n \.\.\$ axis\.line : list\(\)\\n \.\. \.\.- attr\(\*, "class"\)= chr \[1:2\] "element_blank" "element"\\n \.\.\$ axis\.line\.x : NULL\\n \.\.\$ axis\.line\.x\.top : NULL\\n \.\.\$ axis\.line\.x\.bottom : NULL\\n \.\.\$ axis\.line\.y : NULL\\n \.\.\$ axis\.line\.y\.left : NULL\\n \.\.\$ axis\.line\.y\.right : NULL\\n \.\.\$ axis\.line\.theta : NULL\\n \.\.\$ axis\.line\.r : NULL\\n \.\.\$ legend\.background :List of 5\\n \.\. \.\.\$ fill : NULL\\n \.\. \.\.\$ colour : logi NA\\n \.\. \.\.\$ linewidth : NULL\\n \.\. \.\.\$ linetype : NULL\\n \.\. \.\.\$ inherit\.blank: logi TRUE\\n \.\. \.\.- attr\(\*, "class"\)= chr \[1:2\] "element_rect" "element"\\n \.\.\$ legend\.margin : 'margin' num \[1:4\] 5\.5points 5\.5points 5\.5points 5\.5points\\n \.\. \.\.- attr\(\*, "unit"\)= int 8\\n \.\.\$ legend\.spacing : 'simpleUnit' num 11points\\n \.\. \.\.- attr\(\*, "unit"\)= int 8\\n \.\.\$ legend\.spacing\.x : NULL\\n \.\.\$ legend\.spacing\.y : NULL\\n \.\.\$ legend\.key : NULL\\n \.\.\$ legend\.key\.size : 'simpleUnit' num 1\.2lines\\n \.\. \.\.- attr\(\*, "unit"\)= int 3\\n \.\.\$ legend\.key\.height : NULL\\n \.\.\$ legend\.key\.width : NULL\\n \.\.\$ legend\.key\.spacing : 'simpleUnit' num 5\.5points\\n \.\. \.\.- attr\(\*, "unit"\)= int 8\\n \.\.\$ legend\.key\.spacing\.x : NULL\\n \.\.\$ legend\.key\.spacing\.y : NULL\\n \.\.\$ legend\.frame : NULL\\n \.\.\$ legend\.ticks : NULL\\n \.\.\$ legend\.ticks\.length : 'rel' num 0\.2\\n \.\.\$ legend\.axis\.line : NULL\\n \.\.\$ legend\.text :List of 11\\n \.\. \.\.\$ family : NULL\\n \.\. \.\.\$ face : NULL\\n \.\. \.\.\$ colour : NULL\\n \.\. \.\.\$ size : 'rel' num 0\.8\\n \.\. \.\.\$ hjust : NULL\\n \.\. \.\.\$ vjust : NULL\\n \.\. \.\.\$ angle : NULL\\n \.\. \.\.\$ lineheight : NULL\\n \.\. \.\.\$ margin : NULL\\n \.\. \.\.\$ debug : NULL\\n \.\. \.\.\$ inherit\.blank: logi TRUE\\n \.\. \.\.- attr\(\*, "class"\)= chr \[1:2\] "element_text" "element"\\n \.\.\$ legend\.text\.position : NULL\\n \.\.\$ legend\.title :List of 11\\n \.\. \.\.\$ family : NULL\\n \.\. \.\.\$ face : NULL\\n \.\. \.\.\$ colour : NULL\\n \.\. \.\.\$ size : NULL\\n \.\. \.\.\$ hjust : num 0\\n \.\. \.\.\$ vjust : NULL\\n \.\. \.\.\$ angle : NULL\\n \.\. \.\.\$ lineheight : NULL\\n \.\. \.\.\$ margin : NULL\\n \.\. \.\.\$ debug : NULL\\n \.\. \.\.\$ inherit\.blank: logi TRUE\\n \.\. \.\.- attr\(\*, "class"\)= chr \[1:2\] "element_text" "element"\\n \.\.\$ legend\.title\.position : NULL\\n \.\.\$ legend\.position : chr "right"\\n \.\.\$ legend\.position\.inside : NULL\\n \.\.\$ legend\.direction : NULL\\n \.\.\$ legend\.byrow : NULL\\n \.\.\$ legend\.justification : chr "center"\\n \.\.\$ legend\.justification\.top : NULL\\n \.\.\$ legend\.justification\.bottom : NULL\\n \.\.\$ legend\.justification\.left : NULL\\n \.\.\$ legend\.justification\.right : NULL\\n \.\.\$ legend\.justification\.inside : NULL\\n \.\.\$ legend\.location : NULL\\n \.\.\$ legend\.box : NULL\\n \.\.\$ legend\.box\.just : NULL\\n \.\.\$ legend\.box\.margin : 'margin' num \[1:4\] 0cm 0cm 0cm 0cm\\n \.\. \.\.- attr\(\*, "unit"\)= int 1\\n \.\.\$ legend\.box\.background : list\(\)\\n \.\. \.\.- attr\(\*, "class"\)= chr \[1:2\] "element_blank" "element"\\n \.\.\$ legend\.box\.spacing : 'simpleUnit' num 11points\\n \.\. \.\.- attr\(\*, "unit"\)= int 8\\n \.\. \[list output truncated\]\\n \.\.- attr\(\*, "class"\)= chr \[1:2\] "theme" "gg"\\n \.\.- attr\(\*, "complete"\)= logi TRUE\\n \.\.- attr\(\*, "validate"\)= logi TRUE\\n \$ coordinates:Classes 'CoordCartesian', 'Coord', 'ggproto', 'gg' \\n aspect: function\\n backtransform_range: function\\n clip: on\\n default: FALSE\\n distance: function\\n expand: TRUE\\n is_free: function\\n is_linear: function\\n labels: function\\n limits: list\\n modify_scales: function\\n range: function\\n render_axis_h: function\\n render_axis_v: function\\n render_bg: function\\n render_fg: function\\n setup_data: function\\n setup_layout: function\\n setup_panel_guides: function\\n setup_panel_params: function\\n setup_params: function\\n train_panel_guides: function\\n transform: function\\n super: \\n \$ facet :Classes 'FacetGrid', 'Facet', 'ggproto', 'gg' \\n compute_layout: function\\n draw_back: function\\n draw_front: function\\n draw_labels: function\\n draw_panels: function\\n finish_data: function\\n init_scales: function\\n map_data: function\\n params: list\\n setup_data: function\\n setup_params: function\\n shrink: TRUE\\n train_scales: function\\n vars: function\\n super: \\n \$ plot_env : \\n \$ layout :Classes 'Layout', 'ggproto', 'gg' \\n coord: NULL\\n coord_params: list\\n facet: NULL\\n facet_params: list\\n finish_data: function\\n get_scales: function\\n layout: NULL\\n map_position: function\\n panel_params: NULL\\n panel_scales_x: NULL\\n panel_scales_y: NULL\\n render: function\\n render_labels: function\\n reset_scales: function\\n resolve_label: function\\n setup: function\\n setup_panel_guides: function\\n setup_panel_params: function\\n train_position: function\\n super: \\n \$ labels :List of 4\\n \.\.\$ title: chr "K = 3 "\\n \.\.\$ y : chr "Probability"\\n \.\.\$ x : chr "Ind\.ID"\\n \.\.\$ fill : chr "variable"\\n - attr\(\*, "class"\)= chr \[1:2\] "gg" "ggplot"" Backtrace: ▆ 1. └─testthat::expect_output(str(plot), "List of 10") at test_membership.R:5:3 2. └─testthat::expect_match(...) 3. └─testthat:::expect_match_(...) [ FAIL 3 | WARN 0 | SKIP 0 | PASS 39 ] Error: Test failures Execution halted