示例#1
0
static gint var_popup_click (GtkWidget *w, gpointer p)
{
    gchar *item = (gchar *) p;
    int v = mdata_active_var();

    if (!strcmp(item, _("Display values"))) { 
	display_var();
    } else if (!strcmp(item, _("Summary statistics"))) { 
	do_menu_op(VAR_SUMMARY, NULL, OPT_NONE);
    } else if (!strcmp(item, _("Time series plot"))) { 
	do_graph_var(v);
    } else if (!strcmp(item, _("Panel plot..."))) { 
	do_graph_var(v);
    } else if (!strcmp(item, _("Frequency distribution"))) { 
	do_freq_dist();
    } else if (!strcmp(item, _("Boxplot"))) {
	menu_boxplot_callback(v);
    } else if (!strcmp(item, _("Gini coefficient"))) {
	do_gini();
    } else if (!strcmp(item, _("Correlogram"))) {
	do_corrgm();
    } else if (!strcmp(item, _("Periodogram"))) { 
	do_pergm(NULL);
    } else if (!strcmp(item, _("ARIMA model"))) {
	selector_set_varnum(v);
	modelspec_dialog(ARMA);
    } else if (!strcmp(item, _("Dickey-Fuller test"))) { 
	unit_root_test(ADF);
    } else if (!strcmp(item, _("KPSS test"))) { 
	unit_root_test(KPSS);
    } else if (!strcmp(item, _("Edit attributes"))) {  
	varinfo_dialog(v);
    } else if (!strcmp(item, _("Edit values"))) {  
	show_spreadsheet(SHEET_EDIT_VARLIST);
    } else if (!strcmp(item, _("Copy to clipboard"))) { 
	csv_selected_to_clipboard();
    } else if (!strcmp(item, _("Delete"))) { 
	delete_single_var(v);
    } else if (!strcmp(item, _("Add log"))) {
	add_logs_etc(LOGS, v);
    } else if (!strcmp(item, _("Add difference"))) {
	add_logs_etc(DIFF, v);
    } else if (!strcmp(item, _("Define new variable..."))) { 
	genr_callback();
    }

    gtk_widget_destroy(mdata->popup);

    return FALSE;
}
示例#2
0
void series_view_graph (GtkWidget *w, windata_t *vwin)
{
    series_view *sview = (series_view *) vwin->data;

    if (sview == NULL || sview->varnum == 0) {
	return;
    }

    if (dataset_is_time_series(dataset)) {
	do_graph_var(sview->varnum);
    } else {
	do_boxplot_var(sview->varnum, OPT_NONE);
    }
}