Ed,
Rispondo alla tua email diretta a me, perché la tua domanda per me è stata una cosa che ritengo possa essere utile agli altri. Le email dirette non sono disponibili per la ricerca da parte della comunità di utenti generale.
Ecco la mia risposta alla tua email diretta a me, che ha detto:
Jim, sorry, I have 100 columns name(original) in my data file (names go in a row), I bring some of them:
1.1 1.2 1.3 1.4.1 1.5.1 1.5.2 1.5.3 1.5.4 1.5.5 1.5.6 1.5.7 1.5.8
I try list them using comma as separator in your script (but it does not work)... Ed
Names Default To Here( 1 );
dt = Open( "F:/R/data/donor.jmp" );
dis = dt << Distribution( Nominal Distribution( Column( : 1.1, 1.2, 1.3, etc. ) ) );
Report( dis )["Frequencies"][Table Box( 1 )][Number Col Box( 2 )] <<
set format( "Percent", 7, 1 ) << set heading( "Percent" );
Il codice che hai specificato per creare le distribuzioni non è corretto e, inoltre, il codice necessario per gestire più distribuzioni obbliga a modificare il codice necessario per passare attraverso tutte le uscite per modificare le tabelle delle frequenze
Names Default To Here( 1 );
dt = New Table( "All Nominal",
Add Rows( 40 ),
New Column("1.1",
Character,
"Nominal",
Set Values(
{"KATIE", "LOUISE", "JANE", "JACLYN", "LILLIE", "TIM", "JAMES", "ROBERT",
"BARBARA", "ALICE", "SUSAN", "JOHN", "JOE", "MICHAEL", "DAVID", "JUDY",
"ELIZABETH", "LESLIE", "CAROL", "PATTY", "FREDERICK", "ALFRED", "HENRY",
"LEWIS", "EDWARD", "CHRIS", "JEFFREY", "MARY", "1.1", "ROBERT",
"WILLIAM", "CLAY", "MARK", "DANNY", "MARTHA", "MARION", "PHILLIP",
"LINDA", "KIRK", "LAWRENCE"}
)
),
New Column("1.2",
Character,
"Nominal",
Set Values(
{"12", "12", "12", "12", "12", "12", "12", "12", "13", "13", "13", "13",
"13", "13", "13", "14", "14", "14", "14", "14", "14", "14", "14", "14",
"14", "14", "14", "15", "15", "15", "15", "15", "15", "15", "16", "16",
"16", "17", "17", "17"}
)
),
New Column("1.3",
Character( 1 ),
"Nominal",
Set Values(
{"F", "F", "F", "F", "F", "M", "M", "M", "F", "F", "F", "M", "M", "M",
"M", "F", "F", "F", "F", "F", "M", "M", "M", "M", "M", "M", "M", "F",
"F", "M", "M", "M", "M", "M", "F", "F", "M", "F", "M", "M"}
)
),
New Column("1.4",
Character,
"Nominal",
Set Values(
{"59", "61", "55", "66", "52", "60", "61", "51", "60", "61", "56", "65",
"63", "58", "59", "61", "62", "65", "63", "62", "63", "64", "65", "64",
"68", "64", "69", "62", "64", "67", "65", "66", "62", "66", "65", "60",
"68", "62", "68", "70"}
)
),
New Column("1.5",
Character,
"Nominal",
Set Values(
{"95", "123", "74", "145", "64", "84", "128", "79", "112", "107", "67",
"98", "105", "95", "79", "81", "91", "142", "84", "85", "93", "99",
"119", "92", "112", "99", "113", "92", "112", "128", "111", "105", "104",
"106", "112", "115", "128", "116", "134", "172"}
)
)
);
// Run the distributions
dis = dt << Distribution(
Nominal Distribution( Column( :Name( "1.1" ) ) ),
Nominal Distribution( Column( :Name( "1.2" ) ) ),
Nominal Distribution( Column( :Name( "1.3" ) ) ),
Nominal Distribution( Column( :Name( "1.4" ) ) ),
Nominal Distribution( Column( :Name( "1.5" ) ) )
);
// Change the tables
// Because of Your column names(this is a JMP bug I believe), we have
// to use a direct reference to the Outline Box number. See below where
// if the column names were not of the form 1.1, 1.2, 1.3 etc. a better
// reference could be made
For( i = 2, i <= N Col( dt ) * 2, i++,
Report( dis )[Outline Box( i )]["Frequencies"][Table Box( 1 )][Number Col Box( 2 )] <<
set format( "Percent", 7, 2 ) << set heading( "Percent" )
);
/*For( i = 1, i <= N Col( dt ), i++,
Report( dis )[column(dt,i)<<GET name=""></GET>