Comment convertir une cellule de sortie dans une cellule de texte sans avoir «» dans le texte?

Question

Cela fait partie de mon code:

Grid[{{"Número de indivíduos", "Máximo", "Mínimo", "Mediana", "Média", "Desvio Padrão"}},
Dividers -> Center] // TextCell // CellPrint

Et le résultat que j'obtiens est le suivant:

"Número de indivíduos" | "Máximo" | "Mínimo" | "Mediana" | "Média" | «Desvio Padrão»

Mais je veux obtenir ce résultat sans les guillemets, comment puis-je faire cela?

Answer 1

Fondamentalement, ce qui contrôle si une chaîne affiche des guillemets ou non est l' Celloption ShowStringCharacters. Pour les cellules de sortie, cette option est définie sur False:

CurrentValue[{StyleDefinitions, "Output", ShowStringCharacters}]

Faux

Par conséquent, les cellules de sortie n'afficheront pas de guillemets:

Grid[
    {{"Número de indivíduos", "Máximo", "Mínimo", "Mediana", "Média", "Desvio Padrão"}},
    Dividers -> Center
] // TextCell

Si vous insistez également pour utiliser CellPrint:

Grid[
    {{"Número de indivíduos", "Máximo", "Mínimo", "Mediana", "Média", "Desvio Padrão"}},
    Dividers -> Center
] // TextCell //CellPrint

puis vous créez l' Cellobjet suivant (vous pouvez le voir en utilisant Cell | Show Expressiondans le menu):

Cellule [BoxData [TagBox [GridBox [{{"" <N [UAcute] mero de indiv [IAcute] duos> "", "" <M [AAcute] ximo> "", "" <M [IAcute] nimo> » "," "<Mediana>" "," "<M [EAcute] dia>" "," "<Desvio Padr [ATilde] o>" "}}, AutoDelete-> False, GridBoxDividers -> {" Columns "- > {False, {True}, False}, "Rows" -> {False, {True}, False}}, GridBoxItemSize -> {"Columns" -> {{Automatic}}, "Rows" -> {{Automatic }}}], "Grid"]], GeneratedCell-> True, CellAutoOverwrite-> True, CellChangeTimes -> {3.806851714647841 * ^ 9}]

Notez que cette cellule n'a pas de type (par exemple, "Sortie") comme deuxième argument, comme le deuxième argument GeneratedCell -> True. Ainsi, la valeur de l'option est la valeur par défaut:

CurrentValue[ShowStringCharacters]

Vrai

C'est pourquoi l'ajout CellPrint(ce qui est totalement inutile) montre les guillemets. Si vous devez vraiment utiliser CellPrint, vous pouvez changer votre TextCellpour spécifier cette option:

TextCell[
    Grid[
        {{"Número de indivíduos", "Máximo", "Mínimo", "Mediana", "Média", "Desvio Padrão"}},
        Dividers -> Center
    ],
    ShowStringCharacters->False
] //CellPrint

Answer 2

Sortie avec style "Imprimer"

Grille [{{"Texte 1", Style ["Texte 2", RGBColor [0.8, 0.35, 0], Gras, FontFamily -> "Franklin Gothic", FontSize -> 17], "Texte 3", Style ["Texte) 4 ", RGBColor [0, 0.5, 0.5], FontFamily ->" Garamond "FontSize -> 20]}}, Dividers -> All] // Imprimer