1
2
3
pnorm(2,1,4);
pnorm(-1,1,4)-pnorm(-3,1,4);
1-pnorm(1,1,4);

1
2
3
pnorm(2,100,16);
pnorm(-1,100,16)-pnorm(-3,100,16);
1-pnorm(1,100,16);

1
2
3
4
5
6
7
8
9
car.speed = c(225,250,250,250,215,225,250,215,205,215,235,175,210,214,230,180,190,260,270,270,280,270,210,210,214,165,175,225,225,235);
car.cc = c(4942,3506,4601,4942,4942,4942,4942,4942,2254,3210,3210,1590,1797,1797,1797,3494,3471,2977,2977,3179,3179,2977,3494,3474,1998,3165,3494,3206,3206,3210);
car.hpAt = c(5250,6500,5800,4200,4000,6000,5700,5750,5700,5600,6100,6200,7600,7600,8000,5200,5300,6800,7300,7300,7100,7300,5200,5200,7400,5200,5400,5600,5600,6100);
car.breaks = c('Vented discs','Vented discs','Vented discs','Vented discs','Vented discs','Discs','Vented discs','Vented discs','Discs','Discs','Discs','Drums','Discs','Discs','Discs','Discs','Discs','Vented discs','Vented discs','Vented discs','Vented discs','Vented discs','Discs','Discs','Discs','Discs','Vented discs','Discs','Discs','Discs');
car.names = c('AC Ace','Acura Aceca','Alfa Romeo Aceca','Alpina Cobra','Alpine Cobra 2','Aro Cobra','Asia Cobra','Aston Martin Cobra','Audi CL','Autobianchi CL','Bentley CL','Bertone EL','BMW RSX III','Bristol RSX Coupe III','Buick RSX Coupe III','Cadillac MDX','Callaway MDX','Carbodies NSX','Caterham NSX','Chevrolet NSX','Chrysler NSX','Citroen NSX-T','Cizeta RL','Coggiola RL','Daewoo RSX IV','DAF SLX','Daihatsu SLX','Dallas TL II','De Lorean TL II','De Tomaso TL II 2');
 
maxSpeed = car.speed[1];
minSpeed = car.speed[1];
for(i in car.speed)
 ...

1
2
3
4
5
6
7
8
9
car.speed = c(225,250,250,250,215,225,250,215,205,215,235,175,210,214,230,180,190,260,270,270,280,270,210,210,214,165,175,225,225,235);
car.cc = c(4942,3506,4601,4942,4942,4942,4942,4942,2254,3210,3210,1590,1797,1797,1797,3494,3471,2977,2977,3179,3179,2977,3494,3474,1998,3165,3494,3206,3206,3210);
car.hpAt = c(5250,6500,5800,4200,4000,6000,5700,5750,5700,5600,6100,6200,7600,7600,8000,5200,5300,6800,7300,7300,7100,7300,5200,5200,7400,5200,5400,5600,5600,6100);
cars.breaks = c('Vented discs','Vented discs','Vented discs','Vented discs','Vented discs','Discs','Vented discs','Vented discs','Discs','Discs','Discs','Drums','Discs','Discs','Discs','Discs','Discs','Vented discs','Vented discs','Vented discs','Vented discs','Vented discs','Discs','Discs','Discs','Discs','Vented discs','Discs','Discs','Discs');
cars.names = c('AC Ace','Acura Aceca','Alfa Romeo Aceca','Alpina Cobra','Alpine Cobra 2','Aro Cobra','Asia Cobra','Aston Martin Cobra','Audi CL','Autobianchi CL','Bentley CL','Bertone EL','BMW RSX III','Bristol RSX Coupe III','Buick RSX Coupe III','Cadillac MDX','Callaway MDX','Carbodies NSX','Caterham NSX','Chevrolet NSX','Chrysler NSX','Citroen NSX-T','Cizeta RL','Coggiola RL','Daewoo RSX IV','DAF SLX','Daihatsu SLX','Dallas TL II','De Lorean TL II','De Tomaso TL II 2');
 
maxSpeed = cars.speed[1];
minSpeed = cars.speed[1];
for(i in car.speed)
 ...

1
2
3
car.speed = c(225,250,250,250,215,225,250,215,205,215,235,175,210,214,230,180,190,260,270,270,280,270,210,210,214,165,175,225,225,235);
maxSpeed = car.speed[1];
maxSpeed;

1
2
3
4
5
6
7
8
9
car.speed = c(225,250,250,250,215,225,250,215,205,215,235,175,210,214,230,180,190,260,270,270,280,270,210,210,214,165,175,225,225,235);
maxSpeed = car.speed[1];
for(i in car.speed)
{
        if(i > maxSpeed)
        {
                maxSpeed = i;
        }
}

1
2
3
4
5
6
7
8
9
car.speed = c(225,250,250,250,215,225,250,215,205,215,235,175,210,214,230,180,190,260,270,270,280,270,210,210,214,165,175,225,225,235);
maxSpeed = car.speed[0];
for(i in car.speed)
{
        if(i > maxSpeed)
        {
                maxSpeed = i;
        }
}

1
2
3
4
5
6
7
8
9
car.speed = c(225,250,250,250,215,225,250,215,205,215,235,175,210,214,230,180,190,260,270,270,280,270,210,210,214,165,175,225,225,235);
maxSpeed = 0;
for(i in car.speed)
{
        if(i > maxSpeed)
        {
                maxSpeed = i;
        }
}

1
2
3
pnorm(2)
pnorm(-1)-pnorm(-3)
pnorm(1,lower.tail = F)

1
2
3
pnorm(2)
1-pnorm(-1)-pnorm(-3)
pnorm(1,lower.tail = F)

1
2
3
pnorm(2)
pnorm(2,lower.tail = F)
pnorm(1,lower.tail = F)

1
2
3
4
5
6
7
8
car.speed = c(225,250,250,250,215,225,250,215,205,215,235,175,210,214,230,180,190,260,270,270,280,270,210,210,214,165,175,225,225,235);
car.cc = c(4942,3506,4601,4942,4942,4942,4942,4942,2254,3210,3210,1590,1797,1797,1797,3494,3471,2977,2977,3179,3179,2977,3494,3474,1998,3165,3494,3206,3206,3210);
car.hpAt = c(5250,6500,5800,4200,4000,6000,5700,5750,5700,5600,6100,6200,7600,7600,8000,5200,5300,6800,7300,7300,7100,7300,5200,5200,7400,5200,5400,5600,5600,6100);
cars.breaks = c('Vented discs','Vented discs','Vented discs','Vented discs','Vented discs','Discs','Vented discs','Vented discs','Discs','Discs','Discs','Drums','Discs','Discs','Discs','Discs','Discs','Vented discs','Vented discs','Vented discs','Vented discs','Vented discs','Discs','Discs','Discs','Discs','Vented discs','Discs','Discs','Discs');
cars.names = c('AC Ace','Acura Aceca','Alfa Romeo Aceca','Alpina Cobra','Alpine Cobra 2','Aro Cobra','Asia Cobra','Aston Martin Cobra','Audi CL','Autobianchi CL','Bentley CL','Bertone EL','BMW RSX III','Bristol RSX Coupe III','Buick RSX Coupe III','Cadillac MDX','Callaway MDX','Carbodies NSX','Caterham NSX','Chevrolet NSX','Chrysler NSX','Citroen NSX-T','Cizeta RL','Coggiola RL','Daewoo RSX IV','DAF SLX','Daihatsu SLX','Dallas TL II','De Lorean TL II','De Tomaso TL II 2');
 
mean(car.speed)
median(car.speed)
 ...

1
2
3
4
5
6
7
8
car.speed = c(225,250,250,250,215,225,250,215,205,215,235,175,210,214,230,180,190,260,270,270,280,270,210,210,214,165,175,225,225,235);
car.cc = c(4942,3506,4601,4942,4942,4942,4942,4942,2254,3210,3210,1590,1797,1797,1797,3494,3471,2977,2977,3179,3179,2977,3494,3474,1998,3165,3494,3206,3206,3210);
car.hpAt = c(5250,6500,5800,4200,4000,6000,5700,5750,5700,5600,6100,6200,7600,7600,8000,5200,5300,6800,7300,7300,7100,7300,5200,5200,7400,5200,5400,5600,5600,6100);
cars.breaks = c('Vented discs','Vented discs','Vented discs','Vented discs','Vented discs','Discs','Vented discs','Vented discs','Discs','Discs','Discs','Drums','Discs','Discs','Discs','Discs','Discs','Vented discs','Vented discs','Vented discs','Vented discs','Vented discs','Discs','Discs','Discs','Discs','Vented discs','Discs','Discs','Discs');
cars.names = c('AC Ace','Acura Aceca','Alfa Romeo Aceca','Alpina Cobra','Alpine Cobra 2','Aro Cobra','Asia Cobra','Aston Martin Cobra','Audi CL','Autobianchi CL','Bentley CL','Bertone EL','BMW RSX III','Bristol RSX Coupe III','Buick RSX Coupe III','Cadillac MDX','Callaway MDX','Carbodies NSX','Caterham NSX','Chevrolet NSX','Chrysler NSX','Citroen NSX-T','Cizeta RL','Coggiola RL','Daewoo RSX IV','DAF SLX','Daihatsu SLX','Dallas TL II','De Lorean TL II','De Tomaso TL II 2');
 
mean(car.speed)
average(car.speed)

1
2
3
4
5
6
7
8
car.speed = c(225,250,250,250,215,225,250,215,205,215,235,175,210,214,230,180,190,260,270,270,280,270,210,210,214,165,175,225,225,235);
car.cc = c(4942,3506,4601,4942,4942,4942,4942,4942,2254,3210,3210,1590,1797,1797,1797,3494,3471,2977,2977,3179,3179,2977,3494,3474,1998,3165,3494,3206,3206,3210);
car.hpAt = c(5250,6500,5800,4200,4000,6000,5700,5750,5700,5600,6100,6200,7600,7600,8000,5200,5300,6800,7300,7300,7100,7300,5200,5200,7400,5200,5400,5600,5600,6100);
cars.breaks = c('Vented discs','Vented discs','Vented discs','Vented discs','Vented discs','Discs','Vented discs','Vented discs','Discs','Discs','Discs','Drums','Discs','Discs','Discs','Discs','Discs','Vented discs','Vented discs','Vented discs','Vented discs','Vented discs','Discs','Discs','Discs','Discs','Vented discs','Discs','Discs','Discs');
cars.names = c('AC Ace','Acura Aceca','Alfa Romeo Aceca','Alpina Cobra','Alpine Cobra 2','Aro Cobra','Asia Cobra','Aston Martin Cobra','Audi CL','Autobianchi CL','Bentley CL','Bertone EL','BMW RSX III','Bristol RSX Coupe III','Buick RSX Coupe III','Cadillac MDX','Callaway MDX','Carbodies NSX','Caterham NSX','Chevrolet NSX','Chrysler NSX','Citroen NSX-T','Cizeta RL','Coggiola RL','Daewoo RSX IV','DAF SLX','Daihatsu SLX','Dallas TL II','De Lorean TL II','De Tomaso TL II 2');
 
mean(car.speed)
ave(car.speed)

1
2
car.speed = c(1,3,5,6);
car.speed

1
2
cars = c(1,2,3,5,6,7)
cars

1
2
a=231
a*2

1
2
a=145.66
a

1
2
ee<-c(11,66)
ee

1
2
cc<-c(11,22)
cc

1
2
cc<-(11,33)
cc

1
2
cc->(11,22)
cc

1
2
cc->c(11,22)
cc

1
2
cc=(11,22)
cc

1
2
cc->c(11,22)
cc

1
2
cc=(123,66)
cc

1
2
a=123
a

1
2
a=123
a

1
2
a=123
a

1
2
ee=12345
ee