Hi, I am learning xyplot. I have an example dataset attached.

plotdata<-read.table("plotdata.txt",sep='\t',header=T,row.names=1)

head(plotdata,n=4)
          y          x type
1 -4.309601 -0.7448405    A
2 -4.715421  0.7875994    A
3 -2.310638  0.5455310    A
4 -2.685803 10.4116868    A

xyplot(y~x,groups=type,plotdata, auto.key=T)

This shows different colors for different levels of "type".

Now, I want to add a fitted line to the plot, the formula is 
-1.324+0.1117*x-0.0006357*x*x

I tried the following code to do this:

xyplot(y~x,groups=type,plotdata, auto.key=T
, panel = function(x,y) { 
    panel.xyplot(x,y, type='p')
    x<-sort(x)
    panel.lines(x,-1.324+0.1117*x-0.0006357*x*x) 

  }) 

Now, it doesn't show different colors for different levels of "type". How can I 
restore that?

Also, is there anyway to put the legend at bottom of the plot (instead at the 
top right now)? And is there anyway to print legend horizontally, instead of 
vertically as shown right now?

Thanks

John


      
y       x       type
1       -4.30960132841301       -0.744840518760792      A
2       -4.71542109959628       0.787599395527709       A
3       -2.31063823031730       0.545530976094587       A
4       -2.68580284811662       10.4116867886136        A
5       0.857277739439742       45.8678415780720        A
6       2.45727135537005        84.8497464051184        A
7       2.13169532824448        103.133586922502        A
8       1.28410512992259        105.748839904875        A
9       -1.03955702898241       -0.899013850822378      A
10      0.829280624483265       2.98715094752831        A
11      -0.50214940111739       1.72294341018182        A
12      3.11786294644213        20.4231486028650        A
13      3.34246850536472        69.3541875183234        A
14      2.70345650675251        111.307639403626        A
15      4.00616663408449        124.004258887019        A
16      5.1806910416212 128.613638097411        A
17      -6.26534533776664       -0.944438526313875      A
18      -3.78598472716979       2.03694726901381        A
19      -4.2138305943426        2.33837780519899        A
20      1.89365585649664        21.6366580986433        A
21      4.58402791158291        67.5861096660383        A
22      2.05571359621679        107.949510371836        A
23      4.05242444227599        112.126993688471        A
24      4.34316209268166        116.153400981747        A
25      -2.12763929077743       -1.08663195011827       A
26      -2.10662282720267       -0.426141043811507      A
27      -3.01995286978557       -1.10752325011792       A
28      -1.64834644316891       7.78787375907454        A
29      1.24401144964837        45.3160993898581        A
30      4.03535823827577        87.1430284366417        A
31      1.29543626134492        105.003743707372        A
32      3.84919041637386        108.601951968250        A
33      -3.24421838888465       -0.382454625559666      A
34      -1.37712133953019       0.300186521658450       A
35      -2.12844632825254       -0.814335902708673      A
36      1.37311802825667        9.791747074437  A
37      -0.393168361803423      52.1011610030969        A
38      2.66057348869074        101.966194385881        A
39      1.91384920016281        112.592562878277        A
40      2.06188667920977        117.376424285145        A
41      -3.05678162571978       -0.483215996703479      A
42      -0.184239995971267      1.23596224758922        A
43      -1.42855399915072       0.248774451716021       A
44      1.49844000607205        17.8847352593804        A
45      2.53542586823079        60.0336036447702        A
46      2.95329003854665        102.482588510080        A
47      5.0685809676014 110.619630044398        A
48      4.06642471090290        120.486184775892        A
49      -0.503130553392357      0.702688068466441       A
50      -0.860471679766733      1.43490186430460        A
51      -0.17788663078253       3.11150418059122        A
52      0.986266958945663       17.0902837098301        A
53      2.19389338149745        57.8826565905442        A
54      3.92589157640871        98.2558014383485        A
55      2.53121102711589        108.302821306135        A
56      2.34432932634521        111.053272678522        A
97      -3.42191838986702       -0.885224809610779      A
98      -1.59014967363784       0.109987040681714       A
99      -1.58111592784537       3.78759624156396        A
100     0.975980130414523       21.9589171041898        A
101     2.65723036397414        63.3950961679038        A
102     3.39213524465907        93.1009307560951        A
103     4.29568471688144        99.8712158796281        A
104     4.84074935161124        100.052602454596        A
121     -1.68332987752984       0.227299766484946       A
122     0.468472823690819       1.87223738102554        A
123     -0.547570024002551      4.37927291184889        A
124     0.224584723010114       28.1273391056646        A
125     1.95018272395341        78.8401126239697        A
126     3.04490590673202        102.303293809834        A
127     3.61065504963216        113.874480526457        A
128     0.481402373966058       120.377904609485        A
145     -4.37211935419606       -0.698310292505367      B
146     -2.85028018488631       0.490197425688831       B
147     -4.15036004160438       -0.719474581612151      B
148     -1.29418903004161       3.56157441615352        B
149     0.811327868248266       25.0653277333866        B
150     2.37944934753012        72.493012300677 B
151     0.0401498831148303      92.9288452260117        B
152     1.22219027271765        95.7760860317234        B
153     -1.08915964467645       -0.643369049685396      B
154     0.80313597211541        2.84608370466381        B
155     -3.18197896014828       -0.0468551551055109     B
156     2.34571631892758        9.66689590054004        B
157     -1.24206189120823       44.1847030925186        B
158     2.74867040530801        89.8880921072125        B
159     -0.0659265492017556     106.342780631345        B
160     2.65633608770301        109.085596455500        B
161     -2.29385160084213       -0.254993317046721      B
162     -0.145773641921373      1.84165533142725        B
163     -3.83950829188074       -0.0737421312269344     B
164     0.0940140809611728      8.47402247517197        B
165     3.43799792316840        45.1074635868675        B
166     3.39982079949263        88.0564148660301        B
167     3.89939771627669        105.722530678046        B
168     3.16168399861466        106.028099197036        B
169     -3.343639653617 -1.37471982960933       B
170     -2.49665488033012       -0.9152696899739        B
171     -5.59213194841361       -1.58093647205257       B
172     -0.859462473084909      2.56444168683185        B
173     0.0517261823051178      27.0084705981399        B
174     2.56214249572394        73.8687549864043        B
175     1.34939205187882        91.0666687849755        B
176     3.20457574553478        99.0786226861479        B
177     -3.32326683980776       -0.259837434913076      B
178     -1.46846311977404       0.192058040447619       B
179     -3.06793976910127       -1.21521327324829       B
180     -0.19822910527085       4.50396062310409        B
181     -0.29897636390912       30.3082407914432        B
182     3.51039774544943        86.3307447686103        B
183     -1.86040655664839       103.207161528797        B
184     1.93164597807710        108.074555728386        B
185     -3.43749157126502       -0.676155552970838      B
186     -0.501781340905707      0.471666549127826       B
187     -3.47007506043330       -0.753819303612168      B
188     1.28537150131061        6.81406215224295        B
189     -0.263840832188775      37.3769071047063        B
190     1.02554347681809        83.2830854870495        B
191     2.39977251069653        97.8341232939126        B
192     3.9024356059087 104.659459926362        B
193     -1.57818247485244       0.479300744574183       B
194     -3.97149831391608       -0.107067491692654      B
195     -0.829825149847237      1.42420157362898        B
196     0.149827058737643       8.61203544230553        B
197     2.02952510714414        37.5823096001268        B
198     3.27646236727811        84.1163279550628        B
199     3.18653481166586        100.748751911379        B
200     3.7647603084384 104.357774820480        B
241     -3.66309324702586       -0.857765600593353      B
242     -2.33668579272476       -0.756886394438857      B
243     -0.757520677692862      0.176229133380322       B
244     0.697027134318412       9.82988624629048        B
245     2.45972477341087        38.5958958153569        B
246     3.05364439278465        75.5537087213201        B
247     4.00641685347439        95.7774897636318        B
248     3.89384103347577        97.3490499244396        B
265     -2.05104840736558       0.176490874698422       B
266     0.730703204895221       1.09551475924003        B
267     -2.00086857044532       1.20536039090163        B
268     -0.779858127133621      13.5470144885892        B
269     1.53187002673428        52.0842083191481        B
270     1.60140049271201        92.1160144065292        B
271     3.12144802620762        107.653150357264        B
272     1.80531398514175        117.711553728577        B
289     -3.99273359779700       -0.593046202187293      C
290     -1.64963678708964       1.34340800344176        C
291     -1.26406658833312       2.07380332809748        C
292     -3.32293432350311       19.8758890068161        C
293     2.01456991280352        62.755377213412 C
294     4.18454363105860        85.2599574143252        C
295     1.99554410131298        102.479202278057        C
296     0.770041577896513       101.712332464069        C
297     -1.10659378543582       -1.09921013307817       C
298     0.226923281792621       3.81578777968356        C
299     0.222086815923576       3.84843966221079        C
300     4.05109945868869        32.701862391913 C
301     2.41814486365832        77.4495001049119        C
302     4.23209762809483        109.711118397348        C
303     4.0676990489783 115.021623868466        C
304     4.30795020565835        111.548533938457        C
305     -3.30792935367424       -0.696243842614292      C
306     -1.45807304337371       2.42717205344003        C
307     -0.823965744330198      5.20025949458195        C
308     3.1586366461333 34.6819031263944        C
309     3.27157582648814        76.9135948241479        C
310     3.80415747297370        111.848713659958        C
311     3.29771797970930        109.336086402968        C
312     1.75774573358417        108.474027134772        C
313     -5.50389288482588       -1.04758341779512       C
314     -1.25675218250750       -0.333579731155283      C
315     -3.56474295969205       0.873896675250827       C
316     -0.0372098736426361     18.5103311223889        C
317     1.06600601707453        62.7952711966725        C
318     3.58157242161292        94.1478889018476        C
319     -0.205562398809629      97.5208707114995        C
320     2.91061787159266        98.0875667684955        C
321     -3.71584833940073       -0.0162850632449793     C
322     -2.07052773363841       1.03541239583684        C
323     -0.578728311785597      1.25700910689176        C
324     0.97176517276147        22.9108249207790        C
325     3.35807402835184        72.3737093704395        C
326     3.68920358027986        105.595129306616        C
327     1.20335073561785        102.760742330682        C
328     1.80743452911720        104.616861932424        C
329     -4.71332944667182       -0.352331721802192      C
330     0.000338658172857007    1.67806666239255        C
331     -1.78597276712201       3.84914473713409        C
332     1.83931738206365        32.5951710565383        C
333     2.63741742099599        71.6911593793588        C
334     4.42348469931275        100.578914252284        C
335     4.44856061156846        99.891680823721 C
336     4.13591808676506        104.948616093425        C
337     0.31902377813588        1.43271039108595        C
338     -0.798935517867552      1.97347220891566        C
339     -1.13986215398304       7.47155033772303        C
340     1.54655820309777        36.7824135906880        C
341     1.52680111549696        82.3009223126435        C
342     4.04478258683761        102.290038744821        C
343     1.57770337903869        103.238695074223        C
344     1.45707580647789        109.557032594521        C
385     -3.05324083742842       -0.275742444556878      C
386     -2.39047255958603       0.933409311088257       C
387     0.152133125196846       6.19517015194753        C
388     2.3478603570395 31.632183279733 C
389     4.16384255033465        72.9086874615985        C
390     3.82221267905056        93.1857213955992        C
391     4.81852600343713        97.3407198949907        C
392     4.46002009310468        100.507282449377        C
409     -1.13013840563627       0.357195369749190       C
410     0.810894432672866       2.86461982799769        C
411     -0.888799503643626      7.97284495804723        C
412     -0.369534669758167      43.0397011000571        C
413     1.47788792040285        90.8741992790207        C
414     1.53122661233229        107.337413536035        C
415     0.118748621256139       113.508286448627        C
416     2.11608278206393        114.201985752175        C
433     -4.64819222636411       -0.354193126062413      D
434     -1.38306639846186       0.699149316911927       D
435     -2.74772998936895       0.872434249011372       D
436     -0.825649366040385      12.8881340713362        D
437     2.10636025088455        52.2544746130076        D
438     1.99464220973046        87.3422847982042        D
439     -0.335268063201337      98.0782853583435        D
440     1.79551944828669        102.899641747004        D
441     -0.170080718323888      -0.664769139911262      D
442     1.34375358911016        3.38116605770846        D
443     -0.82872531605104       2.96294877670788        D
444     2.42504821127554        22.0646209433240        D
445     3.42838517024806        65.4284866853242        D
446     3.31951819814972        101.857766314928        D
447     0.663227149795567       110.196148780903        D
448     5.32873192696978        129.003282848102        D
449     -1.05698119795501       -0.0702247918504218     D
450     -1.07403701814234       2.05213399377119        D
451     -1.31791336155265       3.48026541700731        D
452     1.59945331032445        22.9171401656946        D
453     4.47918250425143        65.3749758061182        D
454     3.32825539368124        102.963358119657        D
455     4.44278544336561        108.788339521769        D
456     4.48371860961771        111.098302879782        D
457     -2.51237957815643       -0.720247632512672      D
458     -1.02646445320265       -0.427218179667325      D
459     0.146070130178782       0.337645798326636       D
460     1.25332146626195        10.4188060999775        D
461     2.48064236397916        51.5579434858673        D
462     4.87119736292986        84.9938875005442        D
463     2.66941125982005        97.7156494785336        D
464     3.64000651486387        102.420910616607        D
465     -3.02078922818051       0.0874217240312171      D
466     -0.62155838093479       1.01582320480149        D
467     -1.46099634761624       0.385912821626437       D
468     -0.183912987362753      13.7823509925258        D
469     3.74104226080575        55.9863992554622        D
470     2.4825853846254 102.358278840382        D
471     2.36524835785817        110.661358895314        D
472     2.64008939313386        108.715365369756        D
473     -1.75372609203980       -0.370649218676964      D
474     0.283888069281513       1.45771102642485        D
475     -1.86867093788159       1.64984512389219        D
476     2.9507785695578 20.7110483295820        D
477     2.25632630801412        59.9073088048123        D
478     3.94062082847523        96.4264444544578        D
479     4.12763579242013        102.271459014079        D
480     5.39528183388814        104.780867338967        D
481     0.0323783296317191      0.405954495742734       D
482     -0.433485582696084      1.46660699769691        D
483     -0.558332784009674      4.07750723506135        D
484     0.907047570382073       19.9602861832996        D
485     2.54109566470212        65.096295379437 D
486     4.88234738390163        98.5006088581658        D
487     2.91764681015513        103.266851041300        D
488     3.75516973478727        111.364125329737        D
529     -2.74036983014867       -0.66479340746131       D
530     -3.95857052377003       0.264129600157388       D
531     -0.77304430657504       3.66226779888901        D
532     2.34696076883598        20.0238896672867        D
533     3.07726294846943        63.0933811366865        D
534     2.90419046152988        86.084828842469 D
535     5.4200840253333 91.3104572174058        D
536     4.8239211397149 98.758340765405 D
553     -1.00881060894486       1.07227280979122        D
554     1.08636914997608        2.6346229211118 D
555     -0.943906817325275      5.03949564150525        D
556     1.65614212923659        28.0237722489502        D
557     0.42554487160214        81.4750609568631        D
558     1.89414047596604        101.186327657962        D
559     3.84013461091975        113.259430616934        D
560     2.24108736057424        116.319444270379        D
______________________________________________
R-help@r-project.org mailing list
https://stat.ethz.ch/mailman/listinfo/r-help
PLEASE do read the posting guide http://www.R-project.org/posting-guide.html
and provide commented, minimal, self-contained, reproducible code.

Reply via email to