datagraphs.asy

import graph;
import utils;

//asy datagraphs -u "xlabel=\"\$\\bm{u}\cdot\\bm{B}/uB$\"" -u "doyticks=false" -u "ylabel=\"\"" -u "legendlist=\"a,b\""

texpreamble("\usepackage{bm}");

size(200,150,IgnoreAspect);

//scale(Linear,Linear);
scale(Log,Linear);

bool dolegend=true;

string filenames=getstring("filenames");
string filename;
string legendlist="";
int n=-1;
bool flag=true;
int lastpos;

bool doxticks=true;
bool doyticks=true;
string xlabel="$x$";
string ylabel="$y$";

usersetting();
bool myleg=((legendlist == "") ? false: true);
string[] legends=set_legends(legendlist);

bool errorbars = false;

while(flag) {
  ++n;
  int pos = find(filenames,",",lastpos);
  if(lastpos == -1) {filename = ""; flag = false;}
  filename = substr(filenames,lastpos,pos-lastpos);

  if(flag) {
    lastpos = pos > 0 ? pos+1 : -1;
   
    file fin = input(filename).line();
    real[][] a = fin.dimension(0,0);

    a = transpose(a);
    real[] x = a[0];
    real[] y = a[1];
    int N = a.length - 1;

    for(int i = 0; i < N; ++i) {
      pen p = Pen(i);
      if(i == 1) p += dashed;
      if(i == 2) p = darkgreen + Dotted;
      draw(graph(x, a[i+1]), p, myleg ? legends[n] : texify(filename));
    }
  }
}

if(doxticks)
  xaxis(xlabel,BottomTop,LeftTicks);
else
  xaxis(xlabel);
if(doyticks)
  yaxis(ylabel,LeftRight,RightTicks);
else
  yaxis(ylabel,LeftRight);

//if(dolegend) attach(legend(),point(plain.E),20plain.E);