Updated export plot mode allowing list produced with Partition to hav…

…e different lengths
micheledinelli · May 12, 2024 · e74a186 · e74a186
1 parent 5988e65
commit e74a186
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/WordVec.wl b/WordVec.wl
@@ -272,8 +272,8 @@ plotEmbeddings[words_, OptionsPattern[{ExportMode -> False}]] := Module[
 
 	If[exportMode,
 	    (* Split the list of words into rows, each containing up to 5 words *)
-	    wordRows = Partition[words, 5];
-
+	    wordRows = Partition[words, UpTo[5]];
+		
 	    (* Create rows to place them beneath the 3D plot *)
 	    textRows = Map[GraphicsRow[Text[Style[#, 8]] & /@ #] &, wordRows];