%This m-file contains the Ebola data vector and produces a plot of the data
function Ebola
%To run this vector, simply enter
%Ebola;
%into the Command Window
D = [1, 1, 1, 1, 1, 1, 1, 1, 1, 2, 3, 4, 6, 9, 11, 13, 13, 13, 13, 13,...
    13, 15, 16, 17, 19, 23, 24, 26, 28, 33, 33, 33, 33, 34, 36, 38,...
    43, 45, 52, 61, 74, 88, 99, 104, 112, 119, 120, 121, 124, 130,...
    135, 136, 146, 153, 159, 165, 170, 176, 179, 182, 183, 185, 187,...
    191, 192, 193, 193, 194, 195, 196, 200, 204, 207, 208, 208, 210,... 
    210, 210, 211, 211, 211, 211, 211, 214, 214, 214, 214, 214, 214, 214];
t = linspace(1,90,90);%produces the time vector
plot(t,D,'c*'),xlabel('t (Days)'),ylabel('R (total deaths)')
title('Total Ebola Deaths Versus Time')