This is bash profile.
bash-4.2$ pwd
/home/accts/sbs5/cs458/www/lectures
bash-4.2$ R
R version 3.2.1 (2015-06-18) -- "World-Famous Astronaut"
Copyright (C) 2015 The R Foundation for Statistical Computing
Platform: x86_64-redhat-linux-gnu (64-bit)
R is free software and comes with ABSOLUTELY NO WARRANTY.
You are welcome to redistribute it under certain conditions.
Type 'license()' or 'licence()' for distribution details.
Natural language support but running in an English locale
R is a collaborative project with many contributors.
Type 'contributors()' for more information and
'citation()' on how to cite R or R packages in publications.
Type 'demo()' for some demos, 'help()' for on-line help, or
'help.start()' for an HTML browser interface to help.
Type 'q()' to quit R.
> library(stockPortfolio)
> ticker <- c("IBM", "WFC", "JPM", "LUV", "XOM")
> ticker
[1] "IBM" "WFC" "JPM" "LUV" "XOM"
> gr <- getReturns(ticker, start="2005-03-31", end="2010-03-31")
>
> names(gr)
[1] "R" "ticker" "period" "start" "end" "full"
> gr$R
IBM WFC JPM LUV XOM
2010-03-01 0.008571845 0.1382589925 0.0662377264 0.0512879174 0.030461590
2010-02-01 0.043620760 -0.0366668120 0.0778121159 0.1103266048 0.015428243
2010-01-04 -0.065011426 0.0533530964 -0.0643920667 -0.0087489308 -0.055140080
2009-12-01 0.036011063 -0.0374465433 -0.0192987485 0.2430067108 -0.091647709
2009-11-02 0.052292968 0.0207352298 0.0172372476 0.0952382237 0.053536144
2009-10-01 0.008360531 -0.0234209066 -0.0456287973 -0.1250000536 0.044599853
2009-09-01 0.013214711 0.0239826008 0.0082835236 0.1743119035 -0.007809109
2009-08-03 0.005686514 0.1272251296 0.1244500814 0.0420382845 -0.011615462
2009-07-01 0.129381366 0.0082440059 0.1347622326 0.1664189486 0.006865914
2009-06-01 -0.017500974 -0.0486275075 -0.0756097459 -0.0007585792 0.008075049
2009-05-01 0.035123723 0.2771069978 0.1181818669 -0.0343838898 0.046405407
2009-04-01 0.065228547 0.4051966050 0.2437449094 0.1026856217 -0.020998522
2009-03-02 0.052808901 0.1768595038 0.1632384629 0.0747028613 0.002945476
2009-02-02 0.009608864 -0.3478217716 -0.1042727997 -0.1615122323 -0.107712482
2009-01-02 0.088997121 -0.3588873907 -0.1810595063 -0.1844546293 -0.041964070
2008-12-01 0.031372552 0.0204222643 -0.0041060702 -0.0029087275 -0.003992500
2008-11-03 -0.117390815 -0.1432451328 -0.2324848789 -0.2657046479 0.087572747
2008-10-01 -0.205112860 -0.0927257960 -0.1098870100 -0.1881461041 -0.045583352
2008-09-02 -0.039185124 0.2398413034 0.2133021211 -0.0472750747 -0.029371289
2008-08-01 -0.045131009 0.0108974235 -0.0526704357 -0.0227617899 -0.000141382
2008-07-01 0.079726736 0.2745264187 0.1974653313 0.1955521451 -0.087370840
2008-06-02 -0.084215419 -0.1385564171 -0.2020930220 -0.0011794558 -0.007097801
2008-05-01 0.076711432 -0.0639981089 -0.0975865526 -0.0135950972 -0.042048395
2008-04-01 0.048289031 0.0223367308 0.1184725805 0.0677419245 0.100378317
2008-03-03 0.011241865 -0.0044475022 0.0565805007 0.0114191909 -0.027927862
2008-02-01 0.067083554 -0.1334964891 -0.1424050275 0.0464784971 0.019668234
2008-01-02 -0.009158116 0.1288506982 0.0954472263 -0.0393442365 -0.085281281
2007-12-03 0.027761861 -0.0690719022 -0.0431828343 -0.1374953566 0.050807422
2007-11-01 -0.091000007 -0.0374005169 -0.0293616359 -0.0042223211 -0.026996172
2007-10-01 -0.014261446 -0.0451993341 0.0340851503 -0.0398648914 -0.006158130
2007-09-04 0.009512413 -0.0251779335 0.0292003620 -0.0205161971 0.079668683
2007-08-01 0.058315218 0.0917254923 0.0115883763 -0.0348045346 0.011073977
2007-07-02 0.051306463 -0.0398065404 -0.0845632692 0.0503018590 0.014902159
2007-06-01 -0.012664139 -0.0254919230 -0.0652131979 0.0422938839 0.008536788
2007-05-01 0.047010559 0.0134462056 -0.0051823453 -0.0027874601 0.052268451
2007-04-02 0.084341169 0.0424048847 0.0845351188 -0.0238094685 0.052087515
2007-03-01 0.014202702 -0.0077809674 -0.0204494497 -0.0277777816 0.052594779
2007-02-01 -0.059807551 -0.0339643326 -0.0302375912 0.0016507295 -0.028538907
2007-01-03 0.020586738 0.0180640164 0.0619266841 -0.0143602489 -0.033015806
2006-12-01 0.056897350 0.0090805762 0.0436473308 -0.0245143143 -0.002343448
2006-11-01 -0.001210094 -0.0213828752 -0.0244519084 0.0452428589 0.080131661
>2006-10-02 0.126800009 0.0030403552 0.0174662297 -0.0978391073 0.064381523
2006-09-01 0.011979778 0.0411510614 0.0284713069 -0.0381061900 -0.008423181
2006-08-01 0.050160558 -0.0317845146 0.0008767785 -0.0369645275 0.003601516
2006-07-03 0.007680401 0.0784137838 0.0950551582 0.0989614722 0.104156458
2006-06-01 -0.038548281 0.0106975698 -0.0150093178 0.0170937223 0.007223825
2006-05-01 -0.026124885 -0.0263171015 -0.0603790128 -0.0073982237 -0.029543959
2006-04-03 -0.001576371 0.0754658386 0.0987268011 -0.0983880038 0.036477194
2006-03-01 0.027791683 -0.0051401462 0.0121536095 0.0727488809 0.025096846
2006-02-01 -0.010560021 0.0381629691 0.0349685484 0.0191360618 -0.048837827
2006-01-03 -0.010948885 -0.0074805035 0.0100566332 0.0018258427 0.117144460
2005-12-01 -0.075365608 -0.0003182084 0.0376469631 -0.0039423965 -0.032052440
2005-11-01 0.088338728 0.0531641218 0.0445112561 0.0306058673 0.038942465
2005-10-03 0.020693047 0.0278299166 0.0901439635 0.0781144823 -0.116462109
2005-09-01 -0.004961637 -0.0176115142 0.0011803045 0.1148649122 0.060767916
2005-08-01 -0.031704980 -0.0197819406 -0.0355720011 -0.0609614140 0.024571580
2005-07-01 0.124797848 -0.0038974365 0.0045740650 0.0186647121 0.022272466
2005-06-01 -0.017869070 0.0193677507 -0.0120280326 -0.0422848360 0.022597859
2005-05-02 -0.008239454 0.0159294681 0.0073259947 -0.0221774209 -0.009534727
2005-04-01 -0.164149731 0.0023411274 0.0360070790 0.0449438996 -0.043120787
> >2006-10-02 0.126800009 0.0030403552 0.0174662297 -0.0978391073 0.064381523
Error: unexpected '>' in ">"
> gr$ticker
[1] "IBM" "WFC" "JPM" "LUV" "XOM"
> gr$period
[1] "month"
> gr$start
[1] "2005-04-01"
> gr$end
[1] "2010-03-01"
> names(gr)
[1] "R" "ticker" "period" "start" "end" "full"
> gr$full
$IBM
Date Open High Low Close Volume Adj.Close
1 2010-03-01 127.50 130.73 125.20 128.25 6300000 114.43662
2 2010-02-01 123.23 128.27 121.61 127.16 6210200 113.46403
3 2010-01-04 131.18 134.25 121.90 122.39 8825300 108.72151
4 2009-12-01 127.29 132.85 126.00 130.90 5849900 116.28111
5 2009-11-02 120.77 128.94 119.50 126.35 5852500 112.23926
6 2009-10-01 119.39 128.61 117.26 120.61 8692800 106.66161
7 2009-09-01 117.67 122.88 115.15 119.61 6631200 105.77725
8 2009-08-03 118.88 120.88 116.12 118.05 5615200 104.39767
9 2009-07-01 105.00 119.37 99.50 117.93 8250000 103.80737
10 2009-06-01 106.94 110.64 103.51 104.42 7637000 91.91524
11 2009-05-01 103.78 106.82 99.83 106.28 7997800 93.55250
12 2009-04-01 96.13 106.05 95.70 103.21 10679800 90.37809
13 2009-03-02 91.17 99.86 83.02 96.89 13666700 84.84385
14 2009-02-02 90.60 97.10 82.85 92.03 12859400 80.58808
15 2009-01-02 83.89 94.94 81.76 91.65 10928800 79.82109
16 2008-12-01 80.95 87.27 75.31 84.16 8886900 73.29780
17 2008-11-03 92.64 94.76 69.50 81.60 11695800 71.06821
18 2008-10-01 115.51 116.80 78.82 92.97 14151200 80.52058
19 2008-09-02 122.87 124.00 109.95 116.96 11304900 101.29813
20 2008-08-01 128.52 129.97 121.50 121.73 6865900 105.42940
21 2008-07-01 117.50 130.93 116.60 127.98 9396900 110.41242
22 2008-06-02 128.49 129.37 118.15 118.53 7655500 102.25960
23 2008-05-01 121.06 129.99 120.78 129.43 8008100 111.66338
24 2008-04-01 115.20 125.00 113.86 120.70 9100700 103.70780
25 2008-03-03 113.86 119.79 111.80 115.14 9449500 98.93054
26 2008-02-01 107.16 116.63 100.60 113.86 8837700 97.83074
27 2008-01-02 108.99 108.99 97.04 107.11 12218000 91.68049
28 2007-12-03 105.55 112.19 104.00 108.10 6994100 92.52787
29 2007-11-01 115.50 116.09 99.27 105.18 10181900 90.02851
30 2007-10-01 117.61 121.46 110.96 116.12 7777600 99.04127
31 2007-09-04 116.34 118.89 114.30 117.80 7366000 100.47417
32 2007-08-01 110.39 117.35 103.70 116.69 9119700 99.52743
33 2007-07-02 105.39 118.82 104.58 110.65 10979700 94.04327
34 2007-06-01 106.62 107.24 101.56 105.25 8410400 89.45372
35 2007-05-01 102.06 108.05 101.35 106.60 6888100 90.60111
36 2007-04-02 94.51 103.00 93.91 102.21 8842800 86.53313
37 2007-03-01 90.25 95.81 88.77 94.26 7765100 79.80250
38 2007-02-01 98.97 100.44 92.47 92.94 7261400 78.68496
39 2007-01-03 97.18 100.90 94.55 99.15 9956700 83.69027
40 2006-12-01 91.90 97.88 90.55 97.15 5446300 82.00211
41 2006-11-01 92.50 94.05 90.43 91.92 5280900 77.58759
42 2006-10-02 81.76 92.68 81.56 92.33 8165200 77.68159
43 2006-09-01 81.13 83.79 79.31 81.94 5377300 68.93999
44 2006-08-01 76.65 81.68 75.05 80.97 4550700 68.12389
45 2006-07-03 77.54 78.53 72.73 77.41 7128500 64.86997
46 2006-06-01 79.89 80.87 76.06 76.82 6698600 64.37554
47 2006-05-01 82.59 83.69 79.06 79.90 5433200 66.95660
48 2006-04-03 82.72 84.45 80.63 82.34 6432000 68.75276
49 2006-03-01 80.20 84.99 79.51 82.47 5103300 68.86131
50 2006-02-01 80.90 82.24 78.93 80.24 6158500 66.99929
51 2006-01-03 82.45 85.03 80.21 81.30 7663100 67.71435
52 2005-12-01 89.15 89.92 81.56 82.20 5976200 68.46396
53 2005-11-01 81.85 89.94 80.64 88.90 5556400 74.04436
54 2005-10-03 80.22 84.60 78.70 81.88 7019600 68.03429
55 2005-09-01 80.16 82.11 76.93 80.22 5772200 66.65500
56 2005-08-01 83.00 84.20 79.87 80.62 4801300 66.98737
57 2005-07-01 74.30 85.11 74.16 83.46 8056500 69.18074
58 2005-06-01 75.57 77.73 73.45 74.20 6439500 61.50504
59 2005-05-02 76.88 78.11 72.50 75.55 6896900 62.62408
60 2005-04-01 91.49 91.76 71.85 76.38 10709200 63.14435
61 2005-03-31 90.46 91.41 90.22 91.38 8837200 75.54505
$WFC
Date Open High Low Close Volume Adj.Close
1 2010-03-01 27.45 31.99 27.15 31.12 36774700 27.46617
2 2010-02-01 28.60 29.13 26.37 27.34 46909100 24.12998
3 2010-01-04 27.02 29.43 26.82 28.43 57825700 25.04843
4 2009-12-01 28.15 28.39 25.00 26.99 58203900 23.77971
5 2009-11-02 27.86 29.13 26.50 28.04 38866300 24.70482
6 2009-10-01 28.06 31.53 25.99 27.52 56627200 24.20296
7 2009-09-01 27.34 29.56 25.81 28.18 43651600 24.78341
8 2009-08-03 24.90 29.35 24.87 27.52 55783400 24.20296
9 2009-07-01 24.25 25.98 22.08 24.46 73919400 21.47128
10 2009-06-01 25.76 26.05 21.57 24.26 80423600 21.29572
11 2009-05-01 19.98 28.45 19.35 25.50 166438000 22.38420
12 2009-04-01 13.72 21.97 13.65 20.01 170599400 17.52727
13 2009-03-02 10.98 17.67 7.80 14.24 196451300 12.47318
14 2009-02-02 18.41 19.74 8.81 12.10 162712100 10.59870
15 2009-01-02 29.18 30.47 13.74 18.90 103981800 16.25123
16 2008-12-01 28.04 32.76 22.57 29.48 54829000 25.34849
17 2008-11-03 34.16 35.25 19.89 28.89 88837100 24.84117
18 2008-10-01 36.98 38.95 25.00 34.05 70695700 28.99449
19 2008-09-02 31.22 44.75 28.79 37.53 70804200 31.95781
20 2008-08-01 30.27 32.07 27.17 30.27 44266100 25.77572
21 2008-07-01 23.47 31.97 20.46 30.27 77212000 25.49786
22 2008-06-02 27.47 27.54 23.46 23.75 44009300 20.00575
23 2008-05-01 29.77 32.40 26.63 27.57 26983500 23.22352
24 2008-04-01 30.33 31.77 27.08 29.75 31992200 24.81141
25 2008-03-03 29.24 33.53 27.10 29.10 41901100 24.26931
26 2008-02-01 33.26 34.56 28.75 29.23 33374000 24.37773
27 2008-01-02 30.48 34.25 24.38 34.08 47940200 28.13344
28 2007-12-03 32.75 33.43 29.50 30.19 22597200 24.92220
29 2007-11-01 33.18 34.29 29.29 32.43 36990300 26.77135
30 2007-10-01 35.20 37.78 32.66 34.01 19916700 27.81151
31 2007-09-04 36.48 37.99 34.71 35.62 16604300 29.12808
32 2007-08-01 33.76 37.99 32.66 36.54 25647400 29.88041
33 2007-07-02 35.42 36.01 33.34 33.77 17545500 27.36989
34 2007-06-01 36.09 36.47 34.69 35.17 12043200 28.50456
35 2007-05-01 36.03 36.49 35.25 36.09 11404100 29.25021
36 2007-04-02 34.42 36.49 33.93 35.89 14600800 28.86212
37 2007-03-01 34.50 35.57 33.01 34.43 15186300 27.68801
38 2007-02-01 35.93 36.36 33.80 34.70 12201400 27.90514
39 2007-01-03 35.93 36.64 35.37 35.92 11024400 28.88624
40 2006-12-01 35.43 36.16 35.01 35.56 8722900 28.37370
41 2006-11-01 36.30 36.95 34.90 35.24 7573000 28.11837
42 2006-10-02 36.32 36.99 35.75 36.29 7041100 28.73276
43 2006-09-01 34.88 36.49 34.21 36.18 6918900 28.64567
44 2006-08-01 72.31 73.78 34.50 34.75 8642400 27.51346
45 2006-07-03 67.11 72.58 66.71 72.34 11058700 28.41667
46 2006-06-01 66.50 69.71 65.14 67.08 10880200 26.35043
47 2006-05-01 68.85 69.24 65.67 66.37 9735500 26.07153
48 2006-04-03 63.98 69.11 63.80 68.69 8628700 26.77620
49 2006-03-01 64.45 65.51 63.41 63.87 7582700 24.89730
50 2006-02-01 61.90 64.94 60.62 64.20 8216500 25.02594
51 2006-01-03 63.20 63.95 61.32 62.36 9806600 24.10599
52 2005-12-01 63.40 64.48 61.95 62.83 7066000 24.28767
53 2005-11-01 60.02 64.70 59.27 62.85 10176200 24.29540
54 2005-10-03 58.50 60.66 57.62 60.20 10266400 23.06896
55 2005-09-01 59.62 60.25 58.00 58.57 10677600 22.44434
56 2005-08-01 61.45 61.91 58.20 59.62 7509800 22.84670
57 2005-07-01 61.80 62.87 60.25 61.34 7906800 23.30777
58 2005-06-01 60.55 62.22 60.00 61.58 7081500 23.39897
59 2005-05-02 60.08 61.80 59.00 60.41 7032600 22.95440
60 2005-04-01 60.15 60.90 57.77 59.94 8802900 22.59448
61 2005-03-31 59.95 60.35 59.79 59.80 17652800 22.54170
$JPM
Date Open High Low Close Volume Adj.Close
1 2010-03-01 42.03 46.05 41.34 44.75 34546300 39.36167
2 2010-02-01 39.10 42.31 37.03 41.97 49681900 36.91641
3 2010-01-04 41.79 45.19 38.07 38.94 56985000 34.25125
4 2009-12-01 42.61 43.09 40.04 41.67 35273800 36.60855
5 2009-11-02 42.18 44.99 40.75 42.49 34144700 37.32895
6 2009-10-01 43.40 47.47 40.53 41.77 41631800 36.69640
7 2009-09-01 43.08 46.50 40.75 43.82 35768700 38.45087
8 2009-08-03 39.12 44.24 38.99 43.46 42084800 38.13498
9 2009-07-01 34.27 39.47 31.59 38.65 51023000 33.91434
10 2009-06-01 37.40 37.73 32.18 34.11 66293200 29.88673
11 2009-05-01 32.85 38.94 32.06 36.90 80175600 32.33129
12 2009-04-01 25.29 35.21 25.29 33.00 105136100 28.91417
13 2009-03-02 21.70 29.60 14.96 26.58 131375300 23.24767
14 2009-02-02 25.00 27.97 18.75 22.85 96059900 19.98530
15 2009-01-02 31.19 31.64 17.70 25.51 82297100 22.31181
16 2008-12-01 30.67 37.70 24.61 31.53 53642600 27.24473
17 2008-11-03 41.25 42.50 19.69 31.66 76786200 27.35706
18 2008-10-01 46.91 50.63 32.52 41.25 72817900 35.64367
19 2008-09-02 39.56 49.00 34.04 46.70 69218300 40.04399
20 2008-08-01 41.11 42.85 35.00 38.49 36847600 33.00413
21 2008-07-01 33.69 43.00 29.24 40.63 59346500 34.83913
22 2008-06-02 42.63 42.77 33.96 34.31 47138700 29.09406
23 2008-05-01 47.68 49.95 41.90 43.00 27856600 36.46297
24 2008-04-01 45.13 48.64 41.17 47.65 33799000 40.40606
25 2008-03-03 40.55 48.16 36.01 42.95 55286400 36.12611
26 2008-02-01 47.26 48.70 40.38 40.65 33361800 34.19153
27 2008-01-02 43.55 49.29 37.66 47.40 45245600 39.86909
28 2007-12-03 45.90 48.02 42.79 43.65 23962700 36.39526
29 2007-11-01 45.65 46.32 40.15 45.62 32020200 38.03785
30 2007-10-01 45.47 47.88 44.60 47.00 19626500 39.18848
31 2007-09-04 44.40 48.06 43.20 45.82 19096800 37.89677
32 2007-08-01 43.70 48.29 42.16 44.52 29869400 36.82156
33 2007-07-02 48.90 50.48 43.50 44.01 26281200 36.39975
34 2007-06-01 51.92 52.08 48.06 48.45 16432000 39.76217
35 2007-05-01 52.40 53.25 51.26 51.83 11537500 42.53608
36 2007-04-02 48.38 53.06 47.70 52.10 16590300 42.75767
37 2007-03-01 48.98 49.65 45.91 48.38 16669700 39.42488
38 2007-02-01 50.96 51.95 47.60 49.39 12440300 40.24793
39 2007-01-03 48.00 51.16 47.32 50.93 13689100 41.50288
40 2006-12-01 46.50 49.00 45.51 48.30 10729800 39.08262
41 2006-11-01 47.75 48.05 45.78 46.28 9395400 37.44811
42 2006-10-02 46.96 48.57 46.37 47.44 11799500 38.38674
43 2006-09-01 45.85 47.49 44.68 46.96 9614300 37.72778
44 2006-08-01 45.79 46.10 43.50 45.66 8902600 36.68335
45 2006-07-03 42.05 45.71 40.40 45.62 12717000 36.65122
46 2006-06-01 42.75 44.20 39.33 42.00 13089200 33.46975
47 2006-05-01 45.38 46.80 41.59 42.64 12440500 33.97976
48 2006-04-03 41.95 45.90 41.48 45.38 12442700 36.16326
49 2006-03-01 41.16 42.43 40.87 41.64 11517800 32.91379
50 2006-02-01 39.88 41.95 39.05 41.14 10614100 32.51857
51 2006-01-03 39.83 40.87 37.88 39.75 13902700 31.41986
52 2005-12-01 38.52 40.56 38.32 39.69 9972700 31.10703
53 2005-11-01 36.79 39.18 36.58 38.25 11926800 29.97843
54 2005-10-03 34.19 36.80 32.92 36.62 13524600 28.70092
55 2005-09-01 33.75 35.00 33.50 33.93 10565400 26.32764
56 2005-08-01 35.32 35.65 33.31 33.89 8849900 26.29660
57 2005-07-01 35.22 35.95 34.30 35.14 9797700 27.26653
58 2005-06-01 35.56 36.50 35.01 35.32 9461700 27.14238
59 2005-05-02 35.58 36.30 34.11 35.75 9871100 27.47282
60 2005-04-01 34.79 35.88 33.35 35.49 13730000 27.27302
61 2005-03-31 34.90 34.93 34.53 34.60 26624400 26.32513
$LUV
Date Open High Low Close Volume Adj.Close
1 2010-03-01 12.59 13.42 12.50 13.22 9060800 12.848248
2 2010-02-01 11.37 12.73 11.02 12.58 11041000 12.221436
3 2010-01-04 11.40 11.97 10.91 11.33 11274100 11.007064
4 2009-12-01 9.26 11.78 9.10 11.43 10199200 11.104214
5 2009-11-02 8.44 9.55 8.10 9.20 8907700 8.933350
6 2009-10-01 9.55 10.10 8.29 8.40 10326600 8.156536
7 2009-09-01 8.18 10.20 7.86 9.60 8799400 9.321756
8 2009-08-03 7.98 9.34 7.85 8.18 10517000 7.938058
9 2009-07-01 6.75 7.89 6.40 7.85 9246800 7.617818
10 2009-06-01 6.83 7.22 6.14 6.73 8794900 6.530945
11 2009-05-01 7.08 7.70 6.58 6.74 8063300 6.535903
12 2009-04-01 6.27 7.75 6.02 6.98 11840600 6.768635
13 2009-03-02 5.75 6.58 4.95 6.33 11792500 6.138318
14 2009-02-02 7.08 7.48 5.73 5.89 13674100 5.711642
15 2009-01-02 8.61 9.95 6.97 7.03 14030400 6.811837
16 2008-12-01 8.50 9.10 7.05 8.62 10462600 8.352493
17 2008-11-03 11.99 12.19 7.68 8.65 11957700 8.376859
18 2008-10-01 14.39 14.97 10.26 11.78 13662700 11.408024
19 2008-09-02 15.83 16.77 13.82 14.51 12880100 14.051819
20 2008-08-01 15.64 16.49 14.50 15.23 11520900 14.749083
21 2008-07-01 12.91 16.09 12.68 15.59 11560600 15.092618
22 2008-06-02 13.08 14.89 12.82 13.04 11601200 12.623973
23 2008-05-01 13.19 13.66 12.21 13.06 7023900 12.638880
24 2008-04-01 12.52 13.50 11.75 13.24 8441400 12.813075
25 2008-03-03 12.22 13.01 11.12 12.40 9053400 12.000161
26 2008-02-01 11.75 13.10 11.62 12.26 7961700 11.864676
27 2008-01-02 12.18 12.77 11.02 11.72 11267400 11.337716
28 2007-12-03 14.04 14.44 12.12 12.20 5220300 11.802059
29 2007-11-01 14.02 14.80 12.89 14.15 6832200 13.683473
30 2007-10-01 14.65 15.06 13.70 14.21 4877300 13.741494
31 2007-09-04 15.11 15.41 14.21 14.80 6141200 14.312042
32 2007-08-01 15.58 16.96 14.66 15.11 7583300 14.611821
33 2007-07-02 14.84 16.57 14.84 15.66 10106900 15.138717
34 2007-06-01 14.38 15.15 14.03 14.91 9122200 14.413682
35 2007-05-01 14.32 14.82 14.14 14.31 7955900 13.828808
36 2007-04-02 14.75 15.90 14.21 14.35 11045100 13.867463
37 2007-03-01 15.05 15.59 14.50 14.70 7967700 14.205693
38 2007-02-01 15.12 16.14 15.00 15.12 8250700 14.611570
39 2007-01-03 15.46 16.58 14.95 15.10 9561200 14.587490
40 2006-12-01 15.60 16.03 15.18 15.32 6192300 14.800022
41 2006-11-01 15.02 16.33 14.61 15.71 9159300 15.171952
42 2006-10-02 16.77 17.03 14.94 15.03 6681300 14.515241
43 2006-09-01 17.43 17.51 16.23 16.66 5782300 16.089415
44 2006-08-01 17.98 18.09 16.09 17.32 4281600 16.726810
45 2006-07-03 16.41 18.20 15.66 17.99 5342600 17.368841
46 2006-06-01 16.14 16.56 15.10 16.37 3289900 15.804777
47 2006-05-01 16.26 16.92 15.28 16.10 3233700 15.539155
48 2006-04-03 17.99 18.20 15.90 16.22 4838100 15.654974
49 2006-03-01 16.70 18.10 16.69 17.99 3823500 17.363316
50 2006-02-01 16.34 16.93 16.03 16.77 3680400 16.185816
51 2006-01-03 16.37 17.26 15.51 16.46 4374200 15.881899
52 2005-12-01 16.50 16.95 16.09 16.43 2901000 15.852954
53 2005-11-01 16.00 16.75 15.89 16.50 3600800 15.915700
54 2005-10-03 14.78 16.09 14.54 16.01 5020400 15.443052
55 2005-09-01 13.32 14.85 13.05 14.85 5050500 14.324130
56 2005-08-01 14.21 14.40 13.06 13.32 2912600 12.848310
57 2005-07-01 13.92 14.75 13.32 14.19 3630900 13.682409
58 2005-06-01 14.55 14.92 13.56 13.93 3519700 13.431710
59 2005-05-02 14.88 15.50 14.36 14.55 4292700 14.024744
60 2005-04-01 14.24 15.40 13.85 14.88 4772800 14.342831
61 2005-03-31 14.34 14.34 14.19 14.24 10705600 13.725934
$XOM
Date Open High Low Close Volume Adj.Close
1 2010-03-01 65.36 67.89 65.08 66.98 26307800 57.73139
2 2010-02-01 65.77 67.23 63.56 65.00 29209100 56.02478
3 2010-01-04 68.72 70.60 64.02 64.43 33544900 55.17355
4 2009-12-01 76.00 76.30 67.64 68.19 30354400 58.39337
5 2009-11-02 72.05 76.54 71.04 75.07 18893700 64.28494
6 2009-10-01 68.39 75.00 66.11 71.67 24248100 61.01825
7 2009-09-01 68.93 71.08 67.83 68.61 21252200 58.41304
8 2009-08-03 70.96 71.89 66.09 69.15 22000100 58.87278
9 2009-07-01 70.67 72.79 64.46 70.39 26744900 59.56466
10 2009-06-01 70.46 74.83 68.08 69.91 28378500 59.15848
11 2009-05-01 67.13 71.39 65.60 69.35 28182500 58.68460
12 2009-04-01 67.04 71.15 64.50 66.67 31807000 56.08208
13 2009-03-02 67.00 71.49 61.86 68.10 44299400 57.28498
14 2009-02-02 76.06 80.50 67.90 67.90 44023900 57.11675
15 2009-01-02 80.06 82.73 74.01 76.48 44804300 64.01160
16 2008-12-01 77.89 83.64 72.68 79.83 46656300 66.81544
17 2008-11-03 73.45 81.03 67.54 80.15 54003200 67.08328
18 2008-10-01 77.19 81.75 56.51 74.12 62482300 61.68164
19 2008-09-02 78.04 82.00 71.51 77.66 38705200 64.62759
20 2008-08-01 80.55 81.50 76.14 80.01 26908400 66.58322
21 2008-07-01 87.87 89.63 79.10 80.43 33014400 66.59264
22 2008-06-02 88.09 90.50 84.77 88.13 28218100 72.96790
23 2008-05-01 90.10 96.12 87.60 88.76 28713400 73.48952
24 2008-04-01 84.80 94.93 84.26 93.07 23311500 76.71527
25 2008-03-03 86.83 88.50 81.97 84.58 32253000 69.71718
26 2008-02-01 87.70 90.17 80.36 87.01 25879700 71.72017
27 2008-01-02 94.15 94.74 77.55 85.70 30841000 70.33677
28 2007-12-03 88.97 95.10 87.71 93.69 20010700 76.89442
29 2007-11-01 89.83 90.95 83.37 89.16 27441300 73.17651
30 2007-10-01 92.45 95.27 89.67 91.99 23720000 75.20681
31 2007-09-04 85.31 93.66 83.88 92.56 24540500 75.67281
32 2007-08-01 84.99 87.90 78.76 85.73 30846000 70.08892
33 2007-07-02 84.50 93.62 84.12 85.13 28263400 69.32126
34 2007-06-01 83.56 86.58 80.85 83.88 25316000 68.30339
35 2007-05-01 79.50 84.32 79.05 83.17 21117100 67.72523
36 2007-04-02 75.35 80.88 75.28 79.38 23657200 64.36118
37 2007-03-01 70.90 76.35 69.02 75.45 28874700 61.17474
38 2007-02-01 74.58 76.10 71.18 71.68 24060100 58.11803
39 2007-01-03 76.26 76.27 70.64 74.10 26449000 59.82538
40 2006-12-01 76.78 79.00 74.82 76.63 19954400 61.86800
41 2006-11-01 71.58 77.37 70.27 76.81 20701700 62.01333
42 2006-10-02 67.29 72.33 64.84 71.42 21755300 57.41275
43 2006-09-01 67.85 68.65 63.87 67.10 24726500 53.94001
44 2006-08-01 67.24 71.22 67.01 67.67 22894000 54.39822
45 2006-07-03 61.80 67.94 61.63 67.74 22007100 54.20300
46 2006-06-01 60.40 62.65 56.64 61.35 24370100 49.08997
47 2006-05-01 63.40 64.77 59.15 60.91 20876700 48.73789
48 2006-04-03 61.36 65.00 60.43 63.08 19051100 50.22164
49 2006-03-01 59.59 61.92 58.44 60.86 19242900 48.45417
50 2006-02-01 62.77 63.08 58.60 59.37 20284700 47.26789
51 2006-01-03 56.42 63.96 56.42 62.75 21662600 49.69488
52 2005-12-01 58.37 60.38 55.60 56.17 16582000 44.48385
53 2005-11-01 56.09 60.26 55.84 58.03 19671400 45.95687
54 2005-10-03 63.55 63.89 54.50 56.14 25924300 44.23428
55 2005-09-01 60.10 65.96 60.10 63.54 21276100 50.06495
56 2005-08-01 59.23 61.34 57.76 59.90 18555800 47.19690
57 2005-07-01 57.75 60.73 57.60 58.75 17362000 46.06501
58 2005-06-01 56.45 61.13 56.33 57.47 17256700 45.06138
59 2005-05-02 57.00 58.65 52.78 56.20 20132700 44.06559
60 2005-04-01 60.10 61.74 55.40 57.03 21283700 44.48979
61 2005-03-31 59.83 60.32 59.54 59.60 41825600 46.49468
> 43 2006-09-01 67.85 68.65 63.87 67.10 24726500 53.94001
Error: unexpected numeric constant in "43 2006"
> cov(gr$R)
IBM WFC JPM LUV XOM
IBM 0.0040321683 0.0011216698 0.0019115021 0.0018387558 0.0005224318
WFC 0.0011216698 0.0140113296 0.0090783733 0.0045665451 0.0002149771
JPM 0.0019115021 0.0090783733 0.0087154871 0.0040875327 -0.0001553506
LUV 0.0018387558 0.0045665451 0.0040875327 0.0082727966 -0.0004548274
XOM 0.0005224318 0.0002149771 -0.0001553506 -0.0004548274 0.0026266033
> cor(gr$R)
IBM WFC JPM LUV XOM
IBM 1.0000000 0.14922997 0.32244795 0.31836738 0.16053252
WFC 0.1492300 1.00000000 0.82152830 0.42415238 0.03543686
JPM 0.3224480 0.82152830 1.00000000 0.48138132 -0.03246908
LUV 0.3183674 0.42415238 0.48138132 1.00000000 -0.09757155
XOM 0.1605325 0.03543686 -0.03246908 -0.09757155 1.00000000
> summary(gr$R)
IBM WFC JPM LUV
Min. :-0.205113 Min. :-0.358887 Min. :-0.23248 Min. :-0.265705
1st Qu.:-0.015071 1st Qu.:-0.032329 1st Qu.:-0.03747 1st Qu.:-0.035345
Median : 0.010425 Median : 0.002691 Median : 0.00917 Median :-0.002848
Mean : 0.008997 Mean : 0.010353 Mean : 0.01104 Mean : 0.003061
3rd Qu.: 0.050447 3rd Qu.: 0.038910 3rd Qu.: 0.06300 3rd Qu.: 0.047434
Max. : 0.129381 Max. : 0.405197 Max. : 0.24374 Max. : 0.243007
XOM
Min. :-0.116462
1st Qu.:-0.028747
Median : 0.005234
Mean : 0.004909
3rd Qu.: 0.040357
Max. : 0.117144
> mean(gr$R[,4])
[1] 0.003061165
> sd(gr$R[,4])
[1] 0.09095492
> sd(gr$R[,2])
[1] 0.1183695
> xx <- as.data.frame(gr$R)
> xx
IBM WFC JPM LUV XOM
2010-03-01 0.008571845 0.1382589925 0.0662377264 0.0512879174 0.030461590
2010-02-01 0.043620760 -0.0366668120 0.0778121159 0.1103266048 0.015428243
2010-01-04 -0.065011426 0.0533530964 -0.0643920667 -0.0087489308 -0.055140080
2009-12-01 0.036011063 -0.0374465433 -0.0192987485 0.2430067108 -0.091647709
2009-11-02 0.052292968 0.0207352298 0.0172372476 0.0952382237 0.053536144
2009-10-01 0.008360531 -0.0234209066 -0.0456287973 -0.1250000536 0.044599853
2009-09-01 0.013214711 0.0239826008 0.0082835236 0.1743119035 -0.007809109
2009-08-03 0.005686514 0.1272251296 0.1244500814 0.0420382845 -0.011615462
2009-07-01 0.129381366 0.0082440059 0.1347622326 0.1664189486 0.006865914
2009-06-01 -0.017500974 -0.0486275075 -0.0756097459 -0.0007585792 0.008075049
2009-05-01 0.035123723 0.2771069978 0.1181818669 -0.0343838898 0.046405407
2009-04-01 0.065228547 0.4051966050 0.2437449094 0.1026856217 -0.020998522
2009-03-02 0.052808901 0.1768595038 0.1632384629 0.0747028613 0.002945476
2009-02-02 0.009608864 -0.3478217716 -0.1042727997 -0.1615122323 -0.107712482
2009-01-02 0.088997121 -0.3588873907 -0.1810595063 -0.1844546293 -0.041964070
2008-12-01 0.031372552 0.0204222643 -0.0041060702 -0.0029087275 -0.003992500
2008-11-03 -0.117390815 -0.1432451328 -0.2324848789 -0.2657046479 0.087572747
2008-10-01 -0.205112860 -0.0927257960 -0.1098870100 -0.1881461041 -0.045583352
2008-09-02 -0.039185124 0.2398413034 0.2133021211 -0.0472750747 -0.029371289
2008-08-01 -0.045131009 0.0108974235 -0.0526704357 -0.0227617899 -0.000141382
2008-07-01 0.079726736 0.2745264187 0.1974653313 0.1955521451 -0.087370840
2008-06-02 -0.084215419 -0.1385564171 -0.2020930220 -0.0011794558 -0.007097801
2008-05-01 0.076711432 -0.0639981089 -0.0975865526 -0.0135950972 -0.042048395
2008-04-01 0.048289031 0.0223367308 0.1184725805 0.0677419245 0.100378317
2008-03-03 0.011241865 -0.0044475022 0.0565805007 0.0114191909 -0.027927862
2008-02-01 0.067083554 -0.1334964891 -0.1424050275 0.0464784971 0.019668234
2008-01-02 -0.009158116 0.1288506982 0.0954472263 -0.0393442365 -0.085281281
2007-12-03 0.027761861 -0.0690719022 -0.0431828343 -0.1374953566 0.050807422
2007-11-01 -0.091000007 -0.0374005169 -0.0293616359 -0.0042223211 -0.026996172
2007-10-01 -0.014261446 -0.0451993341 0.0340851503 -0.0398648914 -0.006158130
2007-09-04 0.009512413 -0.0251779335 0.0292003620 -0.0205161971 0.079668683
2007-08-01 0.058315218 0.0917254923 0.0115883763 -0.0348045346 0.011073977
2007-07-02 0.051306463 -0.0398065404 -0.0845632692 0.0503018590 0.014902159
2007-06-01 -0.012664139 -0.0254919230 -0.0652131979 0.0422938839 0.008536788
2007-05-01 0.047010559 0.0134462056 -0.0051823453 -0.0027874601 0.052268451
2007-04-02 0.084341169 0.0424048847 0.0845351188 -0.0238094685 0.052087515
2007-03-01 0.014202702 -0.0077809674 -0.0204494497 -0.0277777816 0.052594779
2007-02-01 -0.059807551 -0.0339643326 -0.0302375912 0.0016507295 -0.028538907
2007-01-03 0.020586738 0.0180640164 0.0619266841 -0.0143602489 -0.033015806
2006-12-01 0.056897350 0.0090805762 0.0436473308 -0.0245143143 -0.002343448
2006-11-01 -0.001210094 -0.0213828752 -0.0244519084 0.0452428589 0.080131661
2006-10-02 0.126800009 0.0030403552 0.0174662297 -0.0978391073 0.064381523
2006-09-01 0.011979778 0.0411510614 0.0284713069 -0.0381061900 -0.008423181
2006-08-01 0.050160558 -0.0317845146 0.0008767785 -0.0369645275 0.003601516
2006-07-03 0.007680401 0.0784137838 0.0950551582 0.0989614722 0.104156458
2006-06-01 -0.038548281 0.0106975698 -0.0150093178 0.0170937223 0.007223825
2006-05-01 -0.026124885 -0.0263171015 -0.0603790128 -0.0073982237 -0.029543959
2006-04-03 -0.001576371 0.0754658386 0.0987268011 -0.0983880038 0.036477194
2006-03-01 0.027791683 -0.0051401462 0.0121536095 0.0727488809 0.025096846
2006-02-01 -0.010560021 0.0381629691 0.0349685484 0.0191360618 -0.048837827
2006-01-03 -0.010948885 -0.0074805035 0.0100566332 0.0018258427 0.117144460
2005-12-01 -0.075365608 -0.0003182084 0.0376469631 -0.0039423965 -0.032052440
2005-11-01 0.088338728 0.0531641218 0.0445112561 0.0306058673 0.038942465
2005-10-03 0.020693047 0.0278299166 0.0901439635 0.0781144823 -0.116462109
2005-09-01 -0.004961637 -0.0176115142 0.0011803045 0.1148649122 0.060767916
2005-08-01 -0.031704980 -0.0197819406 -0.0355720011 -0.0609614140 0.024571580
2005-07-01 0.124797848 -0.0038974365 0.0045740650 0.0186647121 0.022272466
2005-06-01 -0.017869070 0.0193677507 -0.0120280326 -0.0422848360 0.022597859
2005-05-02 -0.008239454 0.0159294681 0.0073259947 -0.0221774209 -0.009534727
2005-04-01 -0.164149731 0.0023411274 0.0360070790 0.0449438996 -0.043120787
>mean(xx)
[1] NA
Warning message:
In mean.default(xx) : argument is not numeric or logical: returning NA
> cor(gr$R[,4], gr$R[,5])
[1] -0.09757155
>
Save workspace image? [y/n/c]: n
bash-4.2$ cd ..
bash-4.2$ pwd
/home/accts/sbs5/cs458/www
bash-4.2$ cd ..
bash-4.2$ ls
bin class lisp lisp.zip paip stephen.slade.sbs5 SUBMIT www
bash-4.2$ cd paip
bash-4.2$ ls
auxfns.lisp eliza.lisp krep1.lisp othello2.lisp README.html
auxfns.lisp~ eliza-pm.lisp krep2.lisp othello.lisp search.lisp
auxfns.old.lisp examples.lisp krep.lisp overview.lisp simple.lisp
clos.lisp gps1.lisp lexicon.lisp paip.zip student.lisp
cmacsyma.lisp gps.lisp loop.lisp patmatch.lisp syntax1.lisp
compile1.lisp gps-srch.lisp macsyma.lisp prolog1.lisp syntax2.lisp
compile2.lisp grammar.lisp macsymar.lisp prologc1.lisp syntax3.lisp
compile3.lisp interp1.lisp mycin.lisp prologc2.lisp tutor.lisp
compopt.lisp interp2.lisp mycin-r.lisp prologc.lisp unifgram.lisp
edge-tab.lisp interp3.lisp mycin.script prologcp.lisp unify.lisp
eliza1.lisp intro.lisp mycin.script~ prolog.lisp waltz.lisp
bash-4.2$ lisp
This is SBCL 1.2.8-1.el7, an implementation of ANSI Common Lisp.
More information about SBCL is available at .
SBCL is free software, provided as is, with absolutely no warranty.
It is mostly in the public domain; some portions are provided under
BSD-style licenses. See the CREDITS and COPYING files in the
distribution for more information.
* (load "auxfns.lisp")
STYLE-WARNING: using deprecated EVAL-WHEN situation names LOAD COMPILE EVAL
debugger invoked on a SB-KERNEL:SIMPLE-PACKAGE-ERROR in thread
#:
The name NIL does not designate any package.
Type HELP for debugger help, or (SB-EXT:EXIT) to exit from SBCL.
restarts (invokable by number or by possibly-abbreviated name):
0: [RETRY ] Retry EVAL of current toplevel form.
1: [CONTINUE] Ignore error and continue loading file "/home/classes/cs458/paip/auxfns.lisp".
2: [ABORT ] Abort loading file "/home/classes/cs458/paip/auxfns.lisp".
3: Exit debugger, returning to top level.
(SB-INT:%FIND-PACKAGE-OR-LOSE NIL)
0] 1
STYLE-WARNING: using deprecated EVAL-WHEN situation names COMPILE EVAL LOAD
debugger invoked on a SYMBOL-PACKAGE-LOCKED-ERROR in thread
#:
Lock on package COMMON-LISP violated when proclaiming SYMBOL as a function
while in package COMMON-LISP-USER.
See also:
The SBCL Manual, Node "Package Locks"
The ANSI Standard, Section 11.1.2.1.2
Type HELP for debugger help, or (SB-EXT:EXIT) to exit from SBCL.
restarts (invokable by number or by possibly-abbreviated name):
0: [CONTINUE ] Ignore the package lock.
1: [IGNORE-ALL ] Ignore all package locks in the context of this operation.
2: [UNLOCK-PACKAGE] Unlock the package.
3: [RETRY ] Retry EVAL of current toplevel form.
4: Ignore error and continue loading file "/home/classes/cs458/paip/auxfns.lisp".
5: [ABORT ] Abort loading file "/home/classes/cs458/paip/auxfns.lisp".
6: Exit debugger, returning to top level.
(PACKAGE-LOCK-VIOLATION # :SYMBOL SYMBOL :FORMAT-CONTROL "proclaiming ~S as a function" :FORMAT-ARGUMENTS (SYMBOL))
0] 2
T
* (load "mycin.lisp")
STYLE-WARNING:
Previously compiled calls to COMMON-LISP-USER::PARM-PROMPT and
COMMON-LISP-USER::PARM-READER could not be inlined because the structure
definition for COMMON-LISP-USER::PARM was not yet seen. To avoid this
warning, DEFSTRUCT should precede references to the affected functions, or
they must be declared locally notinline at each call site.
T
* (load "mycin-r.lisp")
debugger invoked on a DEFCONSTANT-UNEQL in thread
#:
The constant HELP-STRING is being redefined (from
"~&Type one of the following:
? - to see possible answers for this parameter
rule - to show the current rule
why - to see why this question is asked
help - to see this list
xxx - (for some specific xxx) if there is a definite answer
(xxx .5 yyy .4) - If there are several answers with
different certainty factors."
to "~&Type one of the following:
? - to see possible answers for this parameter
rule - to show the current rule
why - to see why this question is asked
help - to see this list
xxx - (for some specific xxx) if there is a definite answer
(xxx .5 yyy .4) - If there are several answers with
different certainty factors.")
See also:
The ANSI Standard, Macro DEFCONSTANT
The SBCL Manual, Node "Idiosyncrasies"
Type HELP for debugger help, or (SB-EXT:EXIT) to exit from SBCL.
restarts (invokable by number or by possibly-abbreviated name):
0: [CONTINUE] Go ahead and change the value.
1: [ABORT ] Keep the old value.
2: [RETRY ] Retry EVAL of current toplevel form.
3: Ignore error and continue loading file "/home/classes/cs458/paip/mycin.lisp".
4: Abort loading file "/home/classes/cs458/paip/mycin.lisp".
5: Retry EVAL of current toplevel form.
6: Ignore error and continue loading file "/home/classes/cs458/paip/mycin-r.lisp".
7: Abort loading file "/home/classes/cs458/paip/mycin-r.lisp".
8: Exit debugger, returning to top level.
(SB-C::%DEFCONSTANT HELP-STRING "~&Type one of the following:
? - to see possible answers for this parameter
rule - to show the current rule
why - to see why this question is asked
help - to see this list
xxx - (for some specific xxx) if there is a definite answer
(xxx .5 yyy .4) - If there are several answers with
different certainty factors." NIL #S(SB-C:DEFINITION-SOURCE-LOCATION :NAMESTRING "/home/classes/cs458/paip/mycin.lisp" :TOPLEVEL-FORM-NUMBER NIL :PLIST NIL))
0] different certainty factors."
; in: LAMBDA (#:G578)
; (SYMBOL-MACROLET ((SB-DEBUG::ARG-0
; (SB-DI:DEBUG-VAR-VALUE
; '#
; #:G578))
; (SB-DEBUG::ARG-1
; (SB-DI:DEBUG-VAR-VALUE
; '#
; #:G578))
; (SB-DEBUG::ARG-2
; (SB-DI:DEBUG-VAR-VALUE
; '#
; #:G578))
; (SB-DEBUG::ARG-3
; (SB-DI:DEBUG-VAR-VALUE
; '#
; #:G578)))
; DIFFERENT)
;
; caught WARNING:
; undefined variable: DIFFERENT
;
; compilation unit finished
; Undefined variable:
; DIFFERENT
; caught 1 WARNING condition
debugger invoked on a UNBOUND-VARIABLE in thread
#:
The variable DIFFERENT is unbound.
Type HELP for debugger help, or (SB-EXT:EXIT) to exit from SBCL.
restarts (invokable by number or by possibly-abbreviated name):
0: [ABORT ] Reduce debugger level (to debug level 1).
1: [RETRY ] Retry EVAL of current toplevel form.
2: [CONTINUE] Ignore error and continue loading file "/home/classes/cs458/paip/mycin.lisp".
3: Abort loading file "/home/classes/cs458/paip/mycin.lisp".
4: Retry EVAL of current toplevel form.
5: Ignore error and continue loading file "/home/classes/cs458/paip/mycin-r.lisp".
6: Abort loading file "/home/classes/cs458/paip/mycin-r.lisp".
7: Exit debugger, returning to top level.
((LAMBDA (#:G578) :IN "/home/classes/cs458/paip/mycin.lisp") #)
0[2] 0
0] 0
T
* (mycin)
------ PATIENT-1 ------
Patient's name: John
Sex: male
Age: 27
------ CULTURE-1 ------
From what site was the specimen for CULTURE-1 taken? blood
How many days ago was this culture (CULTURE-1) obtained? 3
------ ORGANISM-1 ------
Enter the identity (genus) of ORGANISM-1: unknown
The gram stain of ORGANISM-1: ?
A GRAM must be of type (MEMBER ACID-FAST POS NEG)
The gram stain of ORGANISM-1: neg
Is ORGANISM-1 a rod or coccus (etc.): ?
A MORPHOLOGY must be of type (MEMBER ROD COCCUS)
Is ORGANISM-1 a rod or coccus (etc.): rod
What is the AEROBICITY of ORGANISM-1? why
[Why is the value of AEROBICITY being asked for?]
It is known that:
1) THE GRAM OF THE ORGANISM IS NEG
1) THE MORPHOLOGY OF THE ORGANISM IS ROD
Therefore,
Rule 107:
If
1) THE AEROBICITY OF THE ORGANISM IS AEROBIC
Then there is suggestive evidence (0.8) that
1) THE IDENTITY OF THE ORGANISM IS ENTEROBACTERIACEAE
What is the AEROBICITY of ORGANISM-1? aerobic
Is John a compromised host? why
[Why is the value of COMPROMISED-HOST being asked for?]
It is known that:
1) THE GRAM OF THE ORGANISM IS NEG
1) THE MORPHOLOGY OF THE ORGANISM IS ROD
Therefore,
Rule 75:
If
1) THE PATIENT IS COMPROMISED-HOST
Then there is suggestive evidence (0.6) that
1) THE IDENTITY OF THE ORGANISM IS PSEUDOMONAS
Is John a compromised host? yes
Is John a burn patient? If so, mild or serious? serious
Findings for ORGANISM-1:
Is there another ORGANISM? (y or n) n
Is there another CULTURE? (y or n) n
Is there another PATIENT? (y or n) n
IDENTITY: ENTEROBACTERIACEAE (0.800) PSEUDOMONAS (0.760)
NIL
*