262258_es-ES

liliconcom

Combinando dos gráficos en una ventana

Hola,

Creé 2 gráficos, cada uno con un conmutador de columnas y los agregué en una sola ventana a través del siguiente script:

BoxPlot = LBSelectSplit << Graph Builder(
 Size( 1199, 762 ),
 Show Control Panel( 0 ),
 Show Legend( 0 ),
 Variables(
  X(
   :Visit Name,
   Order By( :Visit Number, Ascending, Order Statistic( "Mean" ) )
  ),
  Y( :Alanine Aminotransferase )
 ),
 Elements( Box Plot( X, Y, Legend( 6 ) ) ),
 Column Switcher(
  :Alanine Aminotransferase,
  {:Alanine Aminotransferase, :Albumin, :Alkaline Phosphatase, :Amylase,
  :Aspartate Aminotransferase, :Bilirubin, :C Reactive Protein, :Calcitonin,
  :Calcium, :Cholesterol, :Creatine Kinase, :Creatinine, :Eosinophils,
  :Erythrocytes, :Gamma Glutamyl Transferase,
  :Name( "Glomerular Filtration Rate, Estimated" ), :HDL Cholesterol,
  :Hematocrit, :Hemoglobin, :Hemoglobin A1C, :LDL Cholesterol, :Leukocytes,
  :Lipase, :Lymphocytes, :Monocytes, :Neutrophils, :Platelets, :Potassium,
  :Sodium, :Triglycerides, :Urea, :VLDL Cholesterol}
 )
);


MeanPlot = LBSelectSplit << Graph Builder(
 Size( 1181, 745 ),
 Show Control Panel( 0 ),
 Show Legend( 0 ),
 Fit to Window( "Maintain Aspect Ratio" ),
 Variables(
  X(
   :Visit Name,
   Order By( :Visit Number, Ascending, Order Statistic( "Mean" ) )
  ),
  Y( :Alanine Aminotransferase )
 ),
 Elements( Line( X, Y, Legend( 6 ), Error Bars( "Standard Error" ) ) ),
 Column Switcher(
  :Alanine Aminotransferase,
  {:Alanine Aminotransferase, :Albumin, :Alkaline Phosphatase, :Amylase,
  :Aspartate Aminotransferase, :Bilirubin, :C Reactive Protein, :Calcitonin,
  :Calcium, :Cholesterol, :Creatine Kinase, :Creatinine, :Eosinophils,
  :Erythrocytes, :Gamma Glutamyl Transferase,
  :Name( "Glomerular Filtration Rate, Estimated" ), :HDL Cholesterol,
  :Hematocrit, :Hemoglobin, :Hemoglobin A1C, :LDL Cholesterol, :Leukocytes,
  :Lipase, :Lymphocytes, :Monocytes, :Neutrophils, :Platelets, :Potassium,
  :Sodium, :Triglycerides, :Urea, :VLDL Cholesterol}
 )
);

New Window("Select Lab Surveillance", CombinedGraphWindow = V List Box());
CombinedGraphWindow << append(Report(MeanPlot)) << append(Report(BoxPlot));

Pero los conmutadores de columna no están incluidos en la nueva ventana. Sé que un conmutador de columna no podrá "cubrir" ambos gráficos, así que quiero uno para cada gráfico, como cuando los gráficos están en dos ventanas separadas. ¿Cómo se puede hacer eso?

 

H. Julie 

Re: Combinando dos gráficos en una ventana.

Olvidé la tabla de datos

Re: Combinando dos gráficos en una ventana.

Si observa lo que termina en la ventana combinada, verá que es solo una copia de la pantalla Graph Builder, y que no tiene capacidad para cambiar, etc.

Lo que debe hacer es agregar el código real para los creadores de gráficos en la ventana de visualización ... algo como:

New Window( "Select Lab Surveillance", CombinedGraphWindow = V List Box() );
CombinedGraphWindow << append(
 MeanPlot = LBSelectSplit << Graph Builder(
  Size( 1181, 745 ),
  Show Control Panel( 0 ),
  Show Legend( 0 ),
  Fit to Window( "Maintain Aspect Ratio" ),
  Variables(
   X( :Visit Name, Order By( :Visit Number, Ascending, Order Statistic( "Mean" ) ) ),
   Y( :Alanine Aminotransferase )
  ),
  Elements( Line( X, Y, Legend( 6 ), Error Bars( "Standard Error" ) ) ),
  Column Switcher(
   :Alanine Aminotransferase,
   {:Alanine Aminotransferase, :Albumin, :Alkaline Phosphatase, :Amylase, :Aspartate Aminotransferase,
   :Bilirubin, :C Reactive Protein, :Calcitonin, :Calcium, :Cholesterol, :Creatine Kinase,
   :Creatinine, :Eosinophils, :Erythrocytes, :Gamma Glutamyl Transferase,
   :Name( "Glomerular Filtration Rate, Estimated" ), :HDL Cholesterol, :Hematocrit, :Hemoglobin,
   :Hemoglobin A1C, :LDL Cholesterol, :Leukocytes, :Lipase, :Lymphocytes, :Monocytes, :Neutrophils,
   :Platelets, :Potassium, :Sodium, :Triglycerides, :Urea, :VLDL Cholesterol}
  )
 )
) << append(
 BoxPlot = LBSelectSplit << Graph Builder(
  Size( 1199, 762 ),
  Show Control Panel( 0 ),
  Show Legend( 0 ),
  Variables(
   X( :Visit Name, Order By( :Visit Number, Ascending, Order Statistic( "Mean" ) ) ),
   Y( :Alanine Aminotransferase )
  ),
  Elements( Box Plot( X, Y, Legend( 6 ) ) ),
  Column Switcher(
   :Alanine Aminotransferase,
   {:Alanine Aminotransferase, :Albumin, :Alkaline Phosphatase, :Amylase, :Aspartate Aminotransferase,
   :Bilirubin, :C Reactive Protein, :Calcitonin, :Calcium, :Cholesterol, :Creatine Kinase,
   :Creatinine, :Eosinophils, :Erythrocytes, :Gamma Glutamyl Transferase,
   :Name( "Glomerular Filtration Rate, Estimated" ), :HDL Cholesterol, :Hematocrit, :Hemoglobin,
   :Hemoglobin A1C, :LDL Cholesterol, :Leukocytes, :Lipase, :Lymphocytes, :Monocytes, :Neutrophils,
   :Platelets, :Potassium, :Sodium, :Triglycerides, :Urea, :VLDL Cholesterol}
  )
 )
);

Re: Combinando dos gráficos en una ventana.

No está mal, pero no es necesario, por lo que puedo decir, usar la capacidad de agregar un cuadro de visualización aquí. New Window () puede usar los resultados de la asignación de Graph Builder para crear la ventana por sí sola. De esta manera, para un código más simple y limpio, en mi opinión.

 

New Window( "Select Lab Surveillance",
 MeanPlot = LBSelectSplit << Graph Builder(
  Size( 1181, 745 ),
  Show Control Panel( 0 ),
  Show Legend( 0 ),
  Fit to Window( "Maintain Aspect Ratio" ),
  Variables(
   X( :Visit Name, Order By( :Visit Number, Ascending, Order Statistic( "Mean" ) ) ),
   Y( :Alanine Aminotransferase )
  ),
  Elements( Line( X, Y, Legend( 6 ), Error Bars( "Standard Error" ) ) ),
  Column Switcher(
   :Alanine Aminotransferase,
   {:Alanine Aminotransferase, :Albumin, :Alkaline Phosphatase, :Amylase, :Aspartate Aminotransferase,
   :Bilirubin, :C Reactive Protein, :Calcitonin, :Calcium, :Cholesterol, :Creatine Kinase,
   :Creatinine, :Eosinophils, :Erythrocytes, :Gamma Glutamyl Transferase,
   :Name( "Glomerular Filtration Rate, Estimated" ), :HDL Cholesterol, :Hematocrit, :Hemoglobin,
   :Hemoglobin A1C, :LDL Cholesterol, :Leukocytes, :Lipase, :Lymphocytes, :Monocytes, :Neutrophils,
   :Platelets, :Potassium, :Sodium, :Triglycerides, :Urea, :VLDL Cholesterol}
  )
 ),
 BoxPlot = LBSelectSplit << Graph Builder(
  Size( 1199, 762 ),
  Show Control Panel( 0 ),
  Show Legend( 0 ),
  Variables(
   X( :Visit Name, Order By( :Visit Number, Ascending, Order Statistic( "Mean" ) ) ),
   Y( :Alanine Aminotransferase )
  ),
  Elements( Box Plot( X, Y, Legend( 6 ) ) ),
  Column Switcher(
   :Alanine Aminotransferase,
   {:Alanine Aminotransferase, :Albumin, :Alkaline Phosphatase, :Amylase, :Aspartate Aminotransferase,
   :Bilirubin, :C Reactive Protein, :Calcitonin, :Calcium, :Cholesterol, :Creatine Kinase,
   :Creatinine, :Eosinophils, :Erythrocytes, :Gamma Glutamyl Transferase,
   :Name( "Glomerular Filtration Rate, Estimated" ), :HDL Cholesterol, :Hematocrit, :Hemoglobin,
   :Hemoglobin A1C, :LDL Cholesterol, :Leukocytes, :Lipase, :Lymphocytes, :Monocytes, :Neutrophils,
   :Platelets, :Potassium, :Sodium, :Triglycerides, :Urea, :VLDL Cholesterol}
  )
 )
);