njpipeorgan / wolfram-language-notebook

Notebook support for Wolfram Language in VS Code
Apache License 2.0
159 stars 11 forks source link

ClassifierFunction output is huge #46

Closed asukaminato0721 closed 1 year ago

asukaminato0721 commented 1 year ago

Describe the bug

run

trainingset = {1 -> "A", 2 -> "A", 3.5 -> "B", 4 -> "B"};
c = Classify[trainingset]

Expected behavior

A less noisy output

Screenshots

image

Environment (please complete the following information):

asukaminato0721 commented 1 year ago

Run

BeginPackage["CommandLineUtilities`Display`"];

WolframPlayer;

Begin["`Private`"];

$TemporaryOutput = FileNameJoin@{$TemporaryDirectory, "WolframKernelOutput"};
If[!DirectoryQ@#, CreateDirectory@#] &@$TemporaryOutput;

MakeNotebook[box_] := Notebook[{Cell@BoxData@box}, WindowSize -> All]

WolframPlayer[expr_, box_] := (
    StartProcess[
        {
            "wolframplayer",
            Export[FileNameJoin@{$TemporaryOutput, CreateUUID["CDFOutput-"]<>".cdf"}, MakeNotebook@box, "CDF"]
        }
    ]
)

End[];

EndPackage[];

(*$DisplayFunction = WolframPlayer[#, ToBoxes@#]&;*)
$Post = With[{box = ToBoxes@#},
    If[FreeQ[DynamicBox|DynamicModuleBox|GraphicsBox|Graphics3DBox]@box,
            #,
            WolframPlayer[#, box]
    ]
]&;

Then

image