structure(.Data = list(CAL = c(2990, 2990, 3150, 3160, 3180, 2750, 
	3210, 2900, 3160, 2910, 3450, 2940, 2460, 2910, 3240, 2930, 
	3180, 2750), LODG = c(8.6, 6.6, 5, 8.2, 9, 6.4, 7.7, 7.9, 
	8.2, 10.1, 4, 5.1, 11.9, 8.8, 9.7, 4.3, 7.7, 13.4), ELEC = 
	c(3322, 2647, 2814, 8199, 2413, 1245, 7013, 3836, 2407, 823,
	1577, 1810, 2734, 12976, 2565, 607, 3680, 6803), EDUC = c(3,
	4.4, 5.3, 5.7, 6, 2.1, 5.1, 6.3, 4.8, 2.4, 4.2, 5.8, 4.5, 
	5.8, 6.7, 1.4, 4.2, 7.4), TV = c(231, 134, 184, 279, 244, 
	84, 392, 193, 185, 9, 111, 146, 190, 175, 197, 29, 263, 288
	)), class = "data.frame", row.names = c("D", "A", "B", 
	"CDN", "DK", "E", "USA", "FI", "F", "G", "IRL", "I", "JAP", 
	"N", "NL", "P", "UK", "S"))