52311_es-ES

liliconcom

¿Colores de barra y barra de error para diagrama de bosque?

Estoy creando diagramas de bosque y se me ocurrieron dos estilos:

Estoy tratando de controlar el color de las barras, los puntos y las barras de error a través de los colores de las filas:

Mi pregunta es ¿por qué las barras sólidas y las barras de error no tienen el color deseado?

dt = New Table( "Forest Plot", Add Rows( 5 ), 
 New Column( "EVENT_NAME", Character( 20 ), "Nominal",
  Set Values( {"AAAAAAA", "BBBBBBB", "CCCCCCC", "DDDDDDD", "EEEEEEE"} ) ),
 New Column( "DISPROP025", Numeric, "Continuous", Format( "Fixed Dec", 16, 2 ),
  Set Values(
   [5.3766744840813, 1.28687381477736, 5.96303490967794, 1.55531597890029, 2.34164191312678] ) ),
 New Column( "DISPROP", Numeric, "Continuous", Format( "Fixed Dec", 16, 2 ),
  Set Values(
   [5.76756983251198, 1.49287821887835, 7.02941951612351, 3.83591362397761, 2.62194430908125] ) ),
 New Column( "DISPROP975", Numeric, "Continuous", Format( "Fixed Dec", 16, 2 ),
  Set Values(
   [6.06935482201811, 1.66251397924122, 7.91895228410917, 6.92389142535734, 2.84619058478479] ) ),
 New Column( "Alert", Character, "Nominal",
  Formula( If( :DISPROP025 > 1 & :DISPROP > 2, "Y", "N" ) ) ),
 Set Row States( [13568, 13056, 13568, 13568, 13568] )
);

// Bars + central point
dt << Graph Builder(
 Show Control Panel( 0 ),
 Variables(
  X( :DISPROP025 ),
  X( :DISPROP, Position( 1 ) ),
  X( :DISPROP975, Position( 1 ) ),
  Y( :EVENT_NAME )
 ),
 Elements(
  Bar( X( 1 ), X( 3 ), Y, Legend( 9 ), Bar Style( "Range" ) ),
  Points( X( 2 ), Y, Legend( 10 ), Jitter( 0 ) )
 ),
 SendToReport(
  Dispatch( {}, "DISPROP025", ScaleBox,
   {Min( 0 ), Add Ref Line( 1, "Dotted", "Dark Red", "", 2 ),
   Label Row( Show Major Grid( 1 ) )}
  ),
  Dispatch( {}, "EVENT_NAME", ScaleBox, {Label Row( Show Major Grid( 1 ) )} ),
  Dispatch( {}, "X title", TextEditBox, {Set Text( "Disproportionality" )} ),
  Dispatch( {}, "Y title", TextEditBox, {Set Text( "PT" )} )
 )
);

// Error bars
dt << Graph Builder(
 Show Control Panel( 0 ),
 Variables(
  X( :DISPROP025 ),
  X( :DISPROP, Position( 1 ) ),
  X( :DISPROP975, Position( 1 ) ),
  Y( :EVENT_NAME )
 ),
 Elements(
  Bar( X( 1 ), X( 3 ), Y, Legend( 9 ), Bar Style( "Interval" ) ),
  Points( X( 2 ), Y, Legend( 10 ), Jitter( 0 ) )
 ),
 SendToReport(
  Dispatch( {}, "DISPROP025", ScaleBox,
   {Min( 0 ), Add Ref Line( 1, "Dotted", "Dark Red", "", 2 ),
   Label Row( Show Major Grid( 1 ) )}
  ),
  Dispatch( {}, "EVENT_NAME", ScaleBox, {Label Row( Show Major Grid( 1 ) )} ),
  Dispatch( {}, "X title", TextEditBox, {Set Text( "Disproportionality" )} ),
  Dispatch( {}, "Y title", TextEditBox, {Set Text( "PT" )} )
 )
);

Re: ¿Colores de barra y barra de error para diagrama de bosque?

Esa es una solución inteligente que está "lo suficientemente cerca para el trabajo del gobierno".Engrosé las líneas a un ancho de 2 y el ligero desplazamiento no se nota.¡Gracias Chris!

Re: ¿Colores de barra y barra de error para diagrama de bosque?

Bueno, maldita sea.Otra forma es apilar las columnas DISPROP en una sola y hacer que la columna de valor (llamada datos en el siguiente script) sea continua. Entonces usa este script

Graph Builder(
 Size( 992, 630 ),
 Show Control Panel( 0 ),
 Variables( X( :Data ), Y( :EVENT_NAME ), Overlay( :Alert ) ),
 Elements(
  Points(
   X,
   Y,
   Legend( 5 ),
   Jitter( 0 ),
   Summary Statistic( "Median" ),
   Error Bars( "Range" )
  )
 ),
 SendToReport(
  Dispatch( {}, "Data", ScaleBox, {Label Row( Show Major Grid( 1 ) )} ),
  Dispatch( {}, "EVENT_NAME", ScaleBox, {Label Row( Show Major Grid( 1 ) )} )
 )
);

Está cerca, pero todavía hay algo un poco fuera de lugar en la línea de cuadrícula y los puntos de datos que usan la superposición

Re: ¿Colores de barra y barra de error para diagrama de bosque?

Todavía no hay alegría.Parece que cuando hay una combinación de alertas Y y N, las barras de error se compensan con las líneas de cuadrícula.

Aquí está el código:

Graph Builder(
 Size( 726, 451 ),
 Show Control Panel( 0 ),
 Show Legend( 0 ),
 Variables(
  X( :DISPROP025 ),
  X( :DISPROP975, Position( 1 ) ),
  X( :DISPROP, Position( 1 ) ),
  Y( :EVENT_NAME ),
  Overlay( :Alert )
 ),
 Elements(
  Bar( X( 1 ), X( 2 ), X( 3 ), Y, Legend( 8 ), Bar Style( "Interval" ) )
 ),
 SendToReport(
  Dispatch( {}, "DISPROP025", ScaleBox,
   {Min( 0 ), Add Ref Line( 1, "Dotted", "Dark Red", "", 1 ),
   Label Row( Show Major Grid( 1 ) )}
  ),
  Dispatch( {}, "EVENT_NAME", ScaleBox, {Label Row( Show Major Grid( 1 ) )} ),
  Dispatch( {}, "400", ScaleBox,
   {Legend Model(
    8,
    Properties( 0, {Line Color( 51 ), Line Width( 2 )} ),
    Properties( 1, {Line Color( 51 ), Marker( "FilledCircle" )} ),
    Properties( 2, {Line Color( 53 ), Line Width( 2 )} ),
    Properties( 3, {Line Color( 53 ), Marker( "FilledCircle" )} )
   )}
  )
 )
);

Re: ¿Colores de barra y barra de error para diagrama de bosque?

La clave para usar la superposición es no tener agregado el elemento de gráfico Puntos. Haga clic en el ícono de puntos en la parte superior para apagarlo. Luego, en la barra de opciones/casilla de disconformidad en la parte inferior izquierda, marque junto a la variable DISPROP. Los puntos no se agregarán en línea con la barra de error.

Re: ¿Colores de barra y barra de error para diagrama de bosque?

Un rompecabezas más: cuando arrastro mi columna Alerta al rol Superposición, puedo controlar los colores muy bien.Sin embargo, los puntos están en las líneas horizontales pero las barras de error no lo están.¿Alguna forma de corregir esto?Si arrastro Alerta a la función Color, no hay "inestabilidad", pero no puedo establecer el color de las barras de error.

Re: ¿Colores de barra y barra de error para diagrama de bosque?

Gracias Chris.Hice una búsqueda de Forest Plots y el muy amable complemento de Richard no apareció.También me gusta tu solución de codificación.

Re: ¿Colores de barra y barra de error para diagrama de bosque?

Espera, encontré una manera. Si abre el panel de control y va a la sección que dice barra en la parte inferior, habrá una sección variable. Ábralo y verifique todas las variables. aparecerá un punto donde lo desees. Elimina el elemento de puntos del gráfico. Luego use la variable Alerta para la superposición.

 

Así que el guión se vería así

Graph Builder(
 Size( 606, 564 ),
 Variables(
  X( :DISPROP025 ),
  X( :DISPROP, Position( 1 ) ),
  X( :DISPROP975, Position( 1 ) ),
  Y( :EVENT_NAME ),
  Overlay( :Alert )
 ),
 Elements(
  Bar( X( 1 ), X( 3 ), X( 2 ), Y, Legend( 9 ), Bar Style( "Interval" ) )
 ),
 SendToReport(
  Dispatch(
   {},
   "DISPROP025",
   ScaleBox,
   {Add Ref Line( 1, "Dotted", "Dark Red", "", 2 ),
   Label Row( Show Major Grid( 1 ) )}
  ),
  Dispatch( {}, "EVENT_NAME", ScaleBox, {Label Row( Show Major Grid( 1 ) )} ),
  Dispatch(
   {},
   "400",
   ScaleBox,
   {Legend Model(
    9,
    Properties( 0, {Line Color( 6 )} ),
    Properties( 1, {Marker( "Dot" )} ),
    Properties( 2, {Line Color( -5682409 )} ),
    Properties( 3, {Marker( "Dot" )} )
   )}
  ),
  Dispatch( {}, "X title", TextEditBox, {Set Text( "Disproportionality" )} ),
  Dispatch( {}, "Y title", TextEditBox, {Set Text( "PT" )} )
 )
);

Re: ¿Colores de barra y barra de error para diagrama de bosque?Es posible que deba usar la variable Alerta para colorear. Esto funciona en el gráfico de barras pero no en el gráfico de barras de error. El color de la barra de error está controlado por el color de la leyenda. No estoy seguro de cómo escribir diferentes colores para diferentes barras de error.Re: ¿Colores de barra y barra de error para diagrama de bosque?

Hola,

 

¿Has echado un vistazo al complemento de Richard Zink sobre parcelas forestales?

 

https://community.jmp.com/t5/JMP-Add-Ins/Forest-Plot-Add-In/ta-p/23977

 

Dado que el complemento es esencialmente un archivo zip, puede cambiar el nombre de la extensión del archivo a .zip y descomprimirlo. Allí puede ver su JSL y tal vez usar algo de eso.

 

cris