$`Centro trabajo 1`
$`Centro trabajo 1`$tabla
                             Padres.Fumadores
Grado.de.fumador              No Si
  1 a 10 cigarrillos diarios   7 13
  11 a 20 cigarrillos diarios 14 24
  De 1 a 2 cajetillas diarias 15 15
  Más de 2 cajetillas diarias 16 17
  No fuma                     19  6

$`Centro trabajo 1`$listaPruebas
$`Centro trabajo 1`$listaPruebas[[1]]

	Pearson's Chi-squared test

data:  tbl1 
X-squared = 11.1206, df = 4, p-value = 0.02524


$`Centro trabajo 1`$listaPruebas[[2]]

	Log likelihood ratio (G-test) test of independence without correction

data:  tbl1 
Log likelihood ratio statistic (G) = 11.5149, X-squared df = 4, p-value
= 0.02135


$`Centro trabajo 1`$listaPruebas[[3]]

	Log likelihood ratio (G-test) test of independence with Williams'
	correction

data:  tbl1 
Log likelihood ratio statistic (G) = 11.2708, X-squared df = 4, p-value
= 0.02368




$`Centro trabajo 2`
$`Centro trabajo 2`$tabla
                             Padres.Fumadores
Grado.de.fumador              No Si
  1 a 10 cigarrillos diarios   7 18
  11 a 20 cigarrillos diarios  3 24
  De 1 a 2 cajetillas diarias  6 17
  Más de 2 cajetillas diarias  2 12
  No fuma                     15  7

$`Centro trabajo 2`$listaPruebas
$`Centro trabajo 2`$listaPruebas[[1]]

	Pearson's Chi-squared test

data:  tbl1 
X-squared = 21.8309, df = 4, p-value = 0.0002166


$`Centro trabajo 2`$listaPruebas[[2]]

	Log likelihood ratio (G-test) test of independence without correction

data:  tbl1 
Log likelihood ratio statistic (G) = 21.2078, X-squared df = 4, p-value
= 0.000288


$`Centro trabajo 2`$listaPruebas[[3]]

	Log likelihood ratio (G-test) test of independence with Williams'
	correction

data:  tbl1 
Log likelihood ratio statistic (G) = 20.4701, X-squared df = 4, p-value
= 0.0004032




$`Centro trabajo 3`
$`Centro trabajo 3`$tabla
                             Padres.Fumadores
Grado.de.fumador              No Si
  1 a 10 cigarrillos diarios  11  8
  11 a 20 cigarrillos diarios 10 27
  De 1 a 2 cajetillas diarias 10 18
  Más de 2 cajetillas diarias  4 23
  No fuma                     10  3

$`Centro trabajo 3`$listaPruebas
$`Centro trabajo 3`$listaPruebas[[1]]

	Pearson's Chi-squared test

data:  tbl1 
X-squared = 19.882, df = 4, p-value = 0.0005269


$`Centro trabajo 3`$listaPruebas[[2]]

	Log likelihood ratio (G-test) test of independence without correction

data:  tbl1 
Log likelihood ratio statistic (G) = 20.2167, X-squared df = 4, p-value
= 0.0004525


$`Centro trabajo 3`$listaPruebas[[3]]

	Log likelihood ratio (G-test) test of independence with Williams'
	correction

data:  tbl1 
Log likelihood ratio statistic (G) = 19.6154, X-squared df = 4, p-value
= 0.0005947




$`Centro trabajo 4`
$`Centro trabajo 4`$tabla
                             Padres.Fumadores
Grado.de.fumador              No Si
  1 a 10 cigarrillos diarios  11 24
  11 a 20 cigarrillos diarios 14 30
  De 1 a 2 cajetillas diarias  4 18
  Más de 2 cajetillas diarias  8 26
  No fuma                     19  8

$`Centro trabajo 4`$listaPruebas
$`Centro trabajo 4`$listaPruebas[[1]]

	Pearson's Chi-squared test

data:  tbl1 
X-squared = 20.044, df = 4, p-value = 0.0004895


$`Centro trabajo 4`$listaPruebas[[2]]

	Log likelihood ratio (G-test) test of independence without correction

data:  tbl1 
Log likelihood ratio statistic (G) = 19.4974, X-squared df = 4, p-value
= 0.0006274


$`Centro trabajo 4`$listaPruebas[[3]]

	Log likelihood ratio (G-test) test of independence with Williams'
	correction

data:  tbl1 
Log likelihood ratio statistic (G) = 19.0705, X-squared df = 4, p-value
= 0.0007613




