¿Cómo convertir una celda de salida en una celda de texto sin tener "" en el texto?

Aug 18 2020

Esto es parte de mi código:

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

Y el resultado que obtengo es este:

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

Pero quiero obtener este resultado sin las comillas, ¿cómo puedo hacer esto?

Respuestas

1 CarlWoll Aug 19 2020 at 19:05

Básicamente, lo que controla si una cadena muestra comillas o no es la Cellopción ShowStringCharacters. Para las celdas de salida, esta opción se establece en False:

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

Falso

Por lo tanto, las celdas de salida no mostrarán comillas:

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

Si insiste en usar CellPrinttambién:

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

luego crea el siguiente Cellobjeto (puede ver esto usando Cell | Show Expressiondesde el menú):

Celda [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 "- > {Falso, {Verdadero}, Falso}, "Filas" -> {Falso, {Verdadero}, Falso}}, GridBoxItemSize -> {"Columnas" -> {{Automático}}, "Filas" -> {{Automático }}}], "Grid"]], GeneratedCell-> True, CellAutoOverwrite-> True, CellChangeTimes -> {3.806851714647841 * ^ 9}]

Observe que esta celda no tiene un tipo (por ejemplo, "Salida") como segundo argumento, como lo es el segundo argumento GeneratedCell -> True. Entonces, el valor de la opción es el predeterminado:

CurrentValue[ShowStringCharacters]

Cierto

Es por eso que agregar CellPrint(que es completamente innecesario) muestra las comillas. Si realmente debe usar CellPrint, entonces puede cambiar su TextCellpara especificar esta opción:

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

IntellectualDilettante Aug 19 2020 at 02:20

Salida con estilo "Imprimir"

Cuadrícula [{{"Text 1", Style ["Text 2", RGBColor [0.8, 0.35, 0], Bold, FontFamily -> "Franklin Gothic", FontSize -> 17], "Text 3", Style ["Text 4 ", RGBColor [0, 0.5, 0.5], FontFamily ->" Garamond "FontSize -> 20]}}, Divisores -> Todos] // Imprimir