#Please do not post homework
#AJ Bu, March 7 2022, Assignment 14


################### PROBLEM 1 ###################

##Look at the wikipedia article Legislative elections in Israel, that has links to all the 
##elections from 1949 to 2021.
##Pick three elections at random, write down the weights [number of seats] (that add up to 120) 
##for each of them, call it L, and use SSVc(L,61) to find their Shapley-Shubik values.

#The 1959 election
#L := [47, 17, 12, 9, 8, 7, 6, 6, 3, 2, 2, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]
#SSVc(L,61)
#	[443  37   29   3    59    613    53    53    59    163    163   
#	[---, ---, ---, --, ----, -----, ----, ----, ----, -----, -----, 
#	[792  396  396  55  1155  13860  1320  1320  3960  13860  13860  

#		   5                                     ]
#		  ---, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]
#		  924                                    ]


#The 1977 election
#L := [43, 32, 15, 12, 5, 4, 1, 2, 2, 1, 1, 1, 1]
#SSVc(L,61)
#	  [4913   3907   28247   1955    5861   1711    701    5521   
#	  [-----, -----, ------, -----, ------, -----, -----, ------, 
#	  [12012  20020  180180  18018  180180  60060  90090  360360  

#		     5521    701    701    701    701 ]
#		    ------, -----, -----, -----, -----]
#		    360360  90090  90090  90090  90090]
	

#the 2006 election
#L:=[29,19,12,12,11,9,7,6,5,4,3,3]

#SSVc(L,61)
#	 [977   401   241   241   599   491    73    629   1027   19   
#	 [----, ----, ----, ----, ----, ----, ----, -----, -----, ---, 
#	 [3465  2520  2520  2520  6930  6930  1386  13860  27720  630  

#		   125   125 ]
#		   ----, ----]
#		   5544  5544]