Lab3_(2)

Remove all objects from workspace.

remove (list = objects() ) 

2.What is reproductive number

Assuming; attack_rate = Rf initial susceptibles = So

1. attack rates = 30%

Compute value

Rf = 0.3
So = 1

Compute Ro - Reproductive number

Ro = -(log((1-Rf)/So))/Rf

print reproductive number

cat ("Reproductive number =", Ro)

## Reproductive number = 1.188916

Description: If attack rate is 30% and initial susceptible is 1, reproductive number is 1.19

2. attack rates = 40%

Compute value

Rf = 0.4
So = 1

Compute Ro - Reproductive number

Ro = -(log((1-Rf)/So))/Rf

print reproductive number

cat ("Reproductive number =", Ro)

## Reproductive number = 1.277064

Description: If attack rate is 40% and initial susceptible is 1, reproductive number is 1.28

3. attack rates = 55%

Compute value

Rf = 0.55
So = 1

Compute Ro - Reproductive number

Ro = -(log((1-Rf)/So))/Rf

print reproductive number

cat ("Reproductive number =", Ro)

## Reproductive number = 1.451832

Description: If attack rate is 55% and initial susceptible is 1, reproductive number is 1.45

4. attack rates = 80%

Compute value

Rf = 0.8
So = 1

Compute Ro - Reproductive number

Ro = -(log((1-Rf)/So))/Rf

print reproductive number

cat ("Reproductive number =", Ro)

## Reproductive number = 2.011797

Description: If attack rate is 80% and initial susceptible is 1, reproductive number is 2.01