svg-lib 0.0.5

checksums.yaml

@@ -0,0 +1,7 @@
+---
+SHA256:
+  metadata.gz: '0958d94cf32f41cfab9959fb9a0b1334feb3fdad141179787c16f61b632211fe'
+  data.tar.gz: 7d03990d325e1cfd66df81a112eee1b39dbdc9ee4f90701bd22a6d2e75722f65
+SHA512:
+  metadata.gz: 75509788882b34a492f5192a0ed2fbba9ad021cb0a90ac5ae5f5df9a66cc34cddbbb77dd423dea3fcaced8bb003281a745efd702d0769ff015b35156df002b6f
+  data.tar.gz: b79c3d399c12bac44f10460a090c89ef6264ca0dd59078ebf73406c98210b1ca443ccd2858673d8cf8ee4eee753ce54b7dfa05a77b4836008baf99a77dab955a

data/bin/eplot

@@ -0,0 +1,188 @@
+#!/usr/bin/env ruby 
+#
+require "svg-lib"
+require "optparse"
+
+
+# ARGUMENTS PARSE =============================================================
+
+opts = {}
+opts[:ylog] = false
+opts[:xlog] = false
+opts[:legend] = false
+opts[:scatterplot] = false
+opts[:minx] = nil
+opts[:maxx] = nil
+opts[:miny] = nil
+opts[:maxy] = nil
+opts[:markers] = []
+opts[:labels] = []
+opts[:linestyles] = []
+
+opts[:title] = ""
+opts[:xlabel] = ""
+
+opts[:width] = 500
+opts[:height] = 500
+
+progname = File.basename($PROGRAM_NAME,File.extname($PROGRAM_NAME))
+parser = OptionParser.new do |parser|
+  parser.banner = <<~banner 
+  #{progname} (easy plot) is a ruby script which allows to create basic 2D 
+  plots quickly that are write in STDOUT in the SVG format.
+
+  Usage: #{progname} [options] [FILES] 
+
+  banner
+
+  parser.on("--width=INT", "plot width") do |num|
+    opts[:width] = num.to_i 
+  end 
+
+  parser.on("--height=INT", "plot height") do |num|
+    opts[:height] = num.to_i 
+  end 
+
+  parser.on("--scatter","scatter plot mode") do 
+    opts[:scatterplot] = true
+  end 
+
+  parser.on("--ylog","show logarithmic axis") do 
+    opts[:ylog] = true
+  end 
+
+  parser.on("--xlog","show logarithmic axis") do 
+    opts[:xlog] = true
+  end 
+
+  parser.on("--legend","show legend") do |bool|
+    opts[:legend] = true
+  end 
+
+  parser.on("--title=STR","title") do |str|
+    opts[:title] = str
+  end 
+
+  parser.on("--xlabel=STR","xlabel") do |str|
+    opts[:xlabel] = str
+  end 
+
+  parser.on("--ylabel=STR","ylabel") do |str|
+    opts[:ylabel] = str
+  end 
+  
+  parser.on("--miny=FLOAT", "value min on y axis") do |num|
+    opts[:miny] = num.to_f 
+  end 
+
+  parser.on("--maxy=FLOAT", "value max on y axis") do |num|
+    opts[:maxy] = num.to_f 
+  end 
+
+  parser.on("--minx=FLOAT", "value min on x axis") do |num|
+    opts[:minx] = num.to_f 
+  end 
+
+  parser.on("--maxx=FLOAT", "value max on x axis") do |num|
+    opts[:maxx] = num.to_f 
+  end 
+
+  parser.on("--markers=\"m1,m2,m3,..\"", "markers to use") do |list|
+    opts[:markers] = list.split(",")
+  end 
+
+  parser.on("--linestyles=\"ls1,ls2,ls3,..\"", "markers to use") do |list|
+    opts[:linestyles] = list.split(",")
+  end 
+
+  parser.on("--labels=\"STR1,STR2,ST3,...\"","title of each plot") do |list|
+    opts[:labels] = list.split(",")
+  end 
+
+
+  parser.on("-h","--help","shows this message") do 
+    STDERR.puts parser
+    exit(0)
+  end 
+end
+parser.parse!
+
+# Get files 
+
+files = [] 
+ARGV.each do |fname|
+  files.push(fname) if File.exists?(fname) || (fname == "-")
+end 
+
+# Check there is at least one file to plot
+if files.empty? 
+  puts parser
+  exit 1
+end 
+
+# MAIN PROGRAM ================================================================
+
+SVG.new(x: 0.0, y: 0.0, width: opts[:width], height: opts[:height],font_family: "monospace") do |svg|
+  plt = SVG::Plot.new(svg)
+  plt.title = opts[:title];
+  plt.xlabel = opts[:xlabel];
+  plt.ylabel = opts[:ylabel];
+  plt.minx   = opts[:minx];
+  plt.maxx   = opts[:maxx];
+  plt.miny   = opts[:miny];
+  plt.maxy   = opts[:maxy];
+
+
+  datavar = []
+  data    = []
+  rawx    = []
+  rawvar  = []
+  rawdata = []
+
+  rawx = [] 
+  files.each do |fname|
+    name = File.basename(fname,File.extname(fname))
+    name = name.split("--")[1] || name
+    opts[:labels].push(name) if opts[:labels].size < files.size 
+    lines = if (fname == "-")
+      STDIN.each_line.to_a
+    else 
+      File.readlines(fname)
+    end 
+    data = lines.map{|e| e.split(/\s+/).map{|e| e.to_f}}
+    if data.first.size > 1
+      x = data.map{|e| e[0]}   
+      data = data.map{|e| e[1]}
+    else
+      x = (1 .. data.size).to_a.map{|e| e.to_f}
+      data = data.map{|e| e[0]}
+    end 
+    rawx.push(x)
+    rawdata.push(data)
+  end 
+
+  plt.minmax(rawx,rawdata,xlog: opts[:xlog], ylog: opts[:ylog])
+
+  rawdata.each_with_index do |y,i|
+    if opts[:scatterplot]
+      plt.scatter(rawx[i],y,
+        ylog: opts[:ylog],
+        label: opts[:labels][i],
+        marker: opts[:markers][i])
+    else
+      plt.plot(rawx[i],y,
+        ylog: opts[:ylog],
+        label: opts[:labels][i],
+        marker: opts[:markers][i],
+        linestyle: opts[:linestyles][i])
+    end 
+
+  end 
+
+  plt.legend if opts[:legend]
+  plt.axes(xlog: opts[:xlog],ylog: opts[:ylog])
+  plt.title  
+end
+
+
+

data/lib/containers.rb

@@ -0,0 +1,24 @@
+class SVG
+  def defs
+    @io.puts "<defs>"
+    yield self
+    @io.puts "</defs>"
+  end 
+
+  def marker(id:,viewBox:,refX:,refY:,title: "",**args)
+    @io.print %(<marker id="#{id}" viewBox="#{viewBox.join(" ")}" refX="#{refX}" refY="#{refY}" )
+    print_args(**args)
+    @io.puts " >"
+    print_title(title)
+    yield self
+    @io.puts "</marker>"
+  end 
+
+  def g(**args)
+    @io.print %(<g )
+    print_args(**args)
+    @io.puts %( >)
+    yield self
+    @io.puts %(</g>)
+  end 
+end 

data/lib/plot2d.rb

@@ -0,0 +1,535 @@
+require "stringio"
+class SVG
+  def plot 
+    return Plot.new
+  end 
+
+  class Plot
+    @svg 
+    @@colors = [
+      "cyan","red","green","blue","orange","deeppink","lightgreen","black","purple","gray",
+      "gray","cyan","purple","tomato","black","green","lightgreen","cornflowerblue","pink","orange"] * 2
+    
+    def self.colors() 
+      return @@colors 
+    end 
+    @@markers   = [".","o","s","1","*","x","+","d","p","H"] * 4
+    def self.markers() 
+      return @@markers 
+    end 
+    @@linestyles = [
+      "-","--","-.",":","3","10 1","10 5","5 10","5 2 2 5","2 10",
+      "2 10","5 2 2 5","5 10","10 5","10 1","3",":","-.","--","-"
+    ] * 2
+    def self.linestyles
+      return @@linestyles
+    end 
+  
+    attr_accessor :minx,:maxx,:miny,:maxy
+    @minx = -1.0/0.0 
+    @maxx = 1.0/0.0
+    @miny = -1.0/0.0
+    @maxy = 1.0/0.0
+
+    def minmax(x,y,xlog: false,ylog: false)
+      miny,maxy = y.flatten.minmax
+      @miny = miny unless (@miny && @miny.finite?)
+      @maxy = maxy unless (@maxy && @maxy.finite?)
+      
+      if ylog 
+        @miny = Math.log([1e-12,@miny].max,10)
+        @maxy = Math.log(@maxy,10)
+      end 
+      minx,maxx = x.flatten.minmax 
+      @minx = minx unless (@minx && @minx.finite?)
+      @maxx = maxx unless (@maxx && @maxx.finite?)
+
+      if xlog 
+        @minx = Math.log([1e-12,@minx].max,10)
+        @maxx = Math.log(@maxx,10)
+      end 
+    end 
+
+    attr_accessor :padleft, :padright,:padtop,:padbottom,:colors,:labels,:markers,
+      :linestyles,:opacities,:linewidth
+
+
+    attr_accessor :markernum,:markersize
+    attr_accessor :xlabel,:ylabel,:axcolor,:axlinewidth,:axlabelstrokewidth,
+      :axlabelfontsize
+    attr_accessor :ticksnum,:tickslen,:tickstextlen,:ticksfontsize,:ticksstrokewidth
+    attr_accessor :legendfontsize,:legendbgcolor,:legendbgopacity,:legendfgcolor,
+      :legendlinelen,:legendheight,:legendpad
+    attr_accessor :title, :titlefontsize
+
+    def initialize(svg)
+      @svg = svg
+
+      @padleft   = 100
+      @padright  = 50
+      @padtop    = 50
+      @padbottom = 80
+      @colors    = [] 
+      @labels    = []
+      @markers   = [] 
+      @linestyles   = [] 
+      @opacities = [] 
+      @linewidth = 2
+
+      @markernum  = 10
+      @markersize = 15
+   
+      @xlabel = ""
+      @ylabel = ""
+      @axcolor = "black"
+      @axlinewidth = 2
+      @axlabelstrokewidth = 0.5
+      @axlabelfontsize = 20
+   
+
+      @ticksnum = 5
+      @tickslen = 10 
+      @tickstextlen = 60
+      @ticksfontsize = 12
+      @ticksstrokewidth = 0.1
+  
+      @legendfontsize = 10 
+      @legendbgcolor = "white"
+      @legendbgopacity = 0.5
+      @legendfgcolor = "black"
+      @legendlinelen = 50 
+      @legendheight = 100 
+      @legendpad = 10 
+
+      @title = ""
+      @titlefontsize = 20 
+    end 
+
+    def self.mapxcoords(x,minx,maxx,w,padleft,padright,log)
+      x = log ? Math.log(x,10) : x
+      xnew = padleft + ((x - minx)/((maxx-minx) + 1e-100))*(w-(padleft + padright))
+    end 
+
+    def self.mapycoords(y,miny,maxy,h,padtop,padbottom,log)
+      y = log ? Math.log(y,10) : y
+      ynew = padtop + ((maxy - y)/((maxy-miny) + 1e-100))*(h-(padtop + padbottom))
+    end
+
+    def map_and_zip(xraw,yraw,minx,maxx,miny,maxy,xlog,ylog)
+      xp = xraw.map{|v| Plot.mapxcoords(v,minx,maxx,@svg.width,@padleft,@padright,xlog)}
+      yp = yraw.map{|v| Plot.mapycoords(v,miny,maxy,@svg.height,@padtop,@padbottom,ylog)}
+      
+      return xp.zip(yp) 
+    end 
+
+    def set_plot_style(label,color,marker,linestyle,opacity)
+      label = @labels.size.to_s if !label
+      color = @@colors[@labels.size] if  !color 
+      marker = @@markers[@labels.size] if !marker
+      linestyle = @@linestyles[@labels.size] if !linestyle
+      opacity = 1.0 if !opacity
+
+      @labels.push(label)
+      @colors.push(color)
+      @markers.push(marker)
+      @linestyles.push(linestyle)
+      @opacities.push(opacity)
+    end 
+
+    def scatter(
+      xraw, yraw, 
+      minx: @minx, maxx:  @maxx, miny: @miny, maxy: @maxy,
+      label: nil, 
+      color:  nil, 
+      marker:  nil, 
+      opacity:  nil,
+      xlog: false, ylog: false,**args)
+     
+      self.set_plot_style(label,color,marker,"",opacity)
+      points = self.map_and_zip(xraw,yraw,minx,maxx,miny,maxy,xlog,ylog)
+ 
+      @svg.g(id: @labels.last, stroke: "none",fill: @colors.last,opacity: @opacities.last) do |g|
+        points.each_with_index do |(x,y),i|
+          self.marker(@markers.last,x,y,"%g" % yraw[i])
+        end 
+      end 
+    
+    end 
+
+    def plot(
+      xraw, yraw,
+      minx: @minx,maxx:  @maxx,miny:  @miny,maxy:  @maxy,
+      label:  nil,
+      color: nil,
+      marker: nil,
+      linestyle: nil,
+      opacity:  nil,
+      xlog: false,ylog: false)
+
+      self.set_plot_style(label,color,marker,linestyle,opacity)
+      points = self.map_and_zip(xraw,yraw,minx,maxx,miny,maxy,xlog,ylog)
+      
+      @svg.g(
+        id: @labels.last,
+        stroke: @colors.last, 
+        fill: @colors.last, 
+        stroke_width: @linewidth,
+        opacity: @opacities.last) do |g|
+
+        g.path(title: @labels.last,fill: "none",stroke_dasharray: self.linestyle(linestyle)) do |path|
+          missing = true
+          points.each do |(x,y)|
+            if !x.finite? || !y.finite?
+              missing = true 
+              next
+            end 
+            if missing 
+              path.m(x,y)
+              missing = false
+            end 
+            path.l(x,y) 
+          end 
+        end 
+      
+        g.g(id: @labels.last+"-markers", fill: @colors.last) do |mg| 
+          points.each_with_index do |(x,y),i|
+            next if ((i % (points.size.to_i / @markernum.to_i)) != 0) || !x.finite? || !y.finite?
+            self.marker(@markers.last,x,y,yraw[i].round(2))
+          end 
+        end 
+      end  
+
+    end
+
+    def title
+      @svg.g(id: "title",text_anchor: "middle") do |g| 
+        g.text(
+          x: (@svg.width).to_i / 2, y: @titlefontsize,
+          text: @title,
+          font_size: @titlefontsize)
+      end 
+    end 
+
+    def legend
+      legendwidth  = @legendlinelen + 2*@legendpad + @legendfontsize*@labels.map{|e| e.size}.max
+      legendheight = 2*@legendpad + @labels.size*2*@legendfontsize
+
+      t = SVG.transform do |t|
+        t.translate(@svg.width-legendwidth-@padright,0)
+      end 
+
+      @svg.g(id: "legend",transform: t) do |g|
+        g.rect(
+          x: 0, 
+          y: 0 ,
+          width: legendwidth, 
+          height: legendheight, 
+          stroke: "none" , 
+          fill: @legendbgcolor, 
+          opacity: @legendbgopacity)
+
+        @labels.size.times do |i|
+          y = (i+1)*(2*@legendfontsize)
+          g.g(id: "legend-marker-line-"+@labels[i],fill: @colors[i],stroke: @colors[i]) do |g|
+            g.line(
+              x1: @legendpad,
+              y1: y - @legendfontsize.to_i / 4, 
+              x2: @legendpad+@legendlinelen, 
+              y2: y - @legendfontsize.to_i / 4,
+              stroke_dasharray: self.linestyle(@linestyles[i]))
+            self.marker(
+              @markers[i],
+              @legendpad + @legendlinelen.to_i / 2,
+              y - @legendfontsize.to_i / 4,
+              "",
+              @legendfontsize)
+          end 
+          g.text(x: @legendpad+@legendfontsize+@legendlinelen,y: y ,text: @labels[i]) 
+        end 
+      end 
+    end 
+
+    def xaxis(min= @minx,max= @maxx,log= false)
+      @svg.g(id: "xaxis",text_anchor: "middle") do |xaxis|
+        xaxis.path(fill: "none") do |path|
+          path.m(@padleft,@svg.height-@padbottom)
+          path.l(@svg.width-@padright,@svg.height - @padbottom)
+        end 
+
+        t = SVG.transform do |t|
+          t.translate(@svg.width / 2,@svg.height-@axlabelfontsize)
+        end 
+        xaxis.g(id: "xlabel",transform: t) do |g| 
+          g.text(text: @xlabel ,x: 0,y: 0,stroke_width: @axlabelstrokewidth)
+        end 
+
+        
+        tickypos = @svg.height - @padbottom - (@tickslen / 2)
+        ticks = [[min,Plot.mapxcoords(min,min,max,@svg.width,@padleft,@padright,false)]]
+        @ticksnum.times do |i|
+          v = min + ((max - min)/(@ticksnum+1))*(i+1)
+          ticks.push([v,Plot.mapxcoords(v,min,max,@svg.width,@padleft,@padright,false)])
+        end 
+        ticks.push([max,Plot.mapxcoords(max,min,max,@svg.width,@padleft,@padright,false)])
+
+        # Dibujar los ticks 
+        xaxis.path do |tickspath|
+          ticks.each do |tick|
+            tickspath.m(tick.last,tickypos)
+            tickspath.l(0,@tickslen,relative: true)
+          end 
+        end 
+        
+        tickypos += @tickstextlen/2
+        ticks.each do |tick|
+          txt = tick.first.round(2).to_s
+          txt = log ? "10^"+txt : txt 
+          xaxis.text(
+            x: tick.last,
+            y: tickypos,
+            text: txt,
+            font_size: @ticksfontsize,
+            stroke_width: @ticksstrokewidth)
+
+        end 
+
+      end 
+    end 
+
+    def yaxis(min = @miny,max = @maxy ,log = false)
+      @svg.g(id: "yaxis") do |yaxis|
+        yaxis.path(fill: "none") do |path|
+          path.m(@padleft,@padtop)
+          path.l(@padleft,@svg.height-@padbottom)
+        end 
+
+        # Mostrar el nombre
+        t = SVG.transform do |t|
+          t.translate(@axlabelfontsize,@svg.height/2)
+          t.rotate(-90,0,0)
+        end 
+        yaxis.g(id: "yaxislabel",transform: t) do |g| 
+          g.text(text: @ylabel ,x: 0,y: 0,stroke_width: @axlabelstrokewidth)
+        end 
+
+
+        # Obtener la posición de los ticks
+        tickxpos = @padleft-@tickslen/2 
+        ticks = [[min,Plot.mapycoords(min,min,max,@svg.height,@padtop,@padbottom,false)]]
+        @ticksnum.times do |i|
+          v = min + ((max - min) / (@ticksnum+1)) * (i+1)
+          ticks.push([v,Plot.mapycoords(v,min,max,@svg.height,@padtop,@padbottom,false)])
+        end 
+        ticks.push([max,Plot.mapycoords(max,min,max,@svg.height,@padtop,@padbottom,false)])
+
+        # Dibujar los ticks 
+        yaxis.path do |tickspath|
+          ticks.each do |tick|
+            tickspath.m(tickxpos,tick.last)
+            tickspath.l(@tickslen,0,relative: true)
+          end 
+        end 
+
+        # Colocar los valores 
+        tickxpos -= @tickstextlen/2
+        ticks.each do |tick|
+          txt = tick.first.round(2).to_s
+          txt = log ? "10^"+txt : txt 
+          yaxis.text(
+            x: tickxpos, y: tick.last, 
+            text: txt, 
+            text_anchor: "middle",
+            stroke_width: @ticksstrokewidth,
+            font_size: @ticksfontsize)
+        end 
+      end 
+    end 
+
+    def axes(minx: @minx,maxx: @maxx,miny: @miny,maxy: @maxy,xlog: false,ylog: false)
+      @svg.g(id: "axis" , stroke: @axcolor,fill: @axcolor,stroke_width: @axlinewidth) do |g|
+        self.xaxis(minx,maxx,xlog)
+        self.yaxis(miny,maxy,ylog)
+      end
+    end 
+
+    def linestyle(style)
+      case style
+      when "-" then "5 0"
+      when "--","dashed" then "5"
+      when "-.","dashdot" then "6 3 3 3"
+      when ":","dotted"  then "2"
+      when " ","","none" then "0 1"
+      else style
+      end 
+    end 
+
+    def marker(marker,x,y,val,ms = @markersize)
+      t = SVG.transform do |t|
+        t.translate(x,y)
+        t.scale(ms)
+        case marker 
+        when "D","x","X" then t.rotate(45)
+        when ">","2","H" then t.rotate(90)
+        when "v","3" then t.rotate(180)
+        when "<","4" then t.rotate(270)
+        else nil
+        end 
+      end 
+
+      case marker 
+      when "." then self.marker_point(t,val)
+      when "," then self.marker_pixel(t,val)
+      when "o" then self.marker_circle(t,val)
+      when "^",">","v","<" then self.marker_triangle(t,val)
+      when "s","D" then self.marker_square(t,val)
+      when "d" then self.marker_diamond(t,val)
+      when "+","x" then self.marker_plus(t,0.1,val)
+      when "P","X" then self.marker_plus(t,0.2,val)
+      when "1","2","3","4" then self.marker_tri(t,val)
+      when "h","H" then self.marker_hexagon(t,val)
+      when "p" then self.marker_pentagon(t,val)
+      when "8" then self.marker_octagon(t,val)
+      when "*" then self.marker_star(t,val)
+      else raise "unkown marker #{marker}"
+      end 
+    end 
+    
+    def marker_point(t,val="")
+      @svg.circle(cx: 0, cy: 0, r: 0.3, transform: t,title: val,stroke_width: 0)
+    end 
+
+    def marker_pixel(t,val="")
+      @svg.circle(cx: 0, cy: 0, r: 0.2, transform: t,title: val,stroke_width: 0)
+    end 
+
+    def marker_circle(t,val="")
+      @svg.circle(cx: 0, cy: 0, r: 0.45, transform: t,title: val,stroke_width: 0)
+    end 
+    
+    def marker_triangle(t,val="")
+      @svg.path(transform: t, title: val,stroke_width: 0) do |path|
+        path.m(0,-0.5)
+        path.l(0.5,0.5)
+        path.l(-0.5,0.5)
+        path.z
+      end 
+    end 
+
+    def marker_square(t,val="")
+      @svg.path(transform: t, title: val,stroke_width: 0) do |path|
+        path.m(-0.4,-0.4)
+        path.h(0.4)
+        path.v(0.4)
+        path.h(-0.4)
+        path.z
+      end 
+    end 
+
+    def marker_diamond(t,val="")
+      @svg.path(transform: t, title: val,stroke_width: 0) do |path|
+        path.m(0,-0.5)
+        path.l(0.3,0)
+        path.l(0,0.5)
+        path.l(-0.3,0.0)
+        path.z
+      end 
+    end 
+
+    def marker_plus(t,width,val="")
+      @svg.path(transform: t, title: val,stroke_width: 0 ) do |path|
+        path.m(-width,-0.5)
+        path.h(width)
+        path.v(0.5)
+        path.h(-width)
+        path.z
+      end 
+      @svg.path(transform: t, title: val,stroke_width: 0 ) do |path|
+        path.m(-0.5,-width)
+        path.v(width)
+        path.h(0.5)
+        path.v(-width)
+        path.z
+      end 
+    end 
+
+    def marker_tri(t,val="")
+      @svg.g(title: val, transform: t,stroke_width: 0) do |g|
+        width = 0.1
+        @svg.path(title: val) do |path|
+          path.m(-width,0.5)
+          path.h(width)
+          path.v(0.0)
+          path.h(-width)
+          path.z
+        end 
+        @svg.path(
+          title: val,
+          transform: SVG.transform{|t| t.rotate(135)}) do |path|
+          path.m(-width,0.5)
+          path.h(width)
+          path.v(0.0)
+          path.h(-width)
+          path.z
+        end 
+        @svg.path(
+          title: val,
+          transform: SVG.transform{|t| t.rotate(225)}) do |path|
+          path.m(-width,0.5)
+          path.h(width)
+          path.v(0.0)
+          path.h(-width)
+          path.z
+        end 
+      end 
+    end 
+    
+    def marker_hexagon(t,val="")
+      @svg.path(title: val, transform: t,stroke_width: 0) do |path|
+        path.m( 0.00,-0.50)
+        path.l( 0.40,-0.20)
+        path.l( 0.40, 0.30)
+        path.l( 0.00, 0.50)
+        path.l(-0.40, 0.30)
+        path.l(-0.40,-0.20)
+        path.z
+      end 
+    end 
+
+    def marker_pentagon(t,val="")
+      @svg.path(title: val, transform: t,stroke_width: 0) do |path|
+        path.m( 0.00,-0.50)
+        path.l( 0.45,-0.10)
+        path.l( 0.30, 0.50)
+        path.l(-0.30, 0.50)
+        path.l(-0.45,-0.10)
+        path.z
+      end 
+    end 
+
+    def marker_octagon(t,val="")
+      @svg.path(title: val, transform: t,stroke_width: 0) do |path|
+        path.m(-0.25,-0.50)
+        path.l( 0.18,-0.50)
+        path.l( 0.50,-0.25)
+        path.l( 0.50, 0.18)
+        path.l( 0.18, 0.50)
+        path.l(-0.25, 0.50)
+        path.l(-0.50, 0.18)
+        path.l(-0.50,-0.25)
+        path.z
+      end 
+    end 
+
+    def marker_star(t,val="")
+      @svg.path(title: val, transform: t,stroke_width: 0) do |path|
+        path.m(0,-0.5)
+        path.l(-0.3,0.5)
+        path.l(0.5,-0.1)
+        path.l(-0.5,-0.1)
+        path.l(0.3,0.5)
+        path.z
+      end 
+    end 
+
+  end 
+end 

data/lib/shapes.rb

@@ -0,0 +1,97 @@
+class SVG
+  def rect(x:,y:,width:,height:,title: "",**args)
+    @io.print %(<rect x="#{x}" y="#{y}" width="#{width}" height="#{height}" )
+    print_args(**args)
+    @io.print " >"
+    print_title(title)
+    @io.puts("</rect>")
+  end 
+
+  def line(x1:,y1:,x2:,y2:,title: "",**args)
+    @io.print %(<line x1="#{x1}" y1="#{y1}" x2="#{x2}" y2="#{y2}" )
+    print_args(**args)
+    @io.print " >"
+    print_title(title)
+    @io.puts("</line>")
+  end
+
+  def circle(cx:,cy:,r:,title: "",**args)
+    @io.print %(<circle cx="#{cx}" cy="#{cy}" r="#{r}" )
+    print_args(**args)
+    @io.print " >"
+    print_title(title)
+    @io.puts("</circle>")
+  end 
+
+  def polygon(points:,title: "",**args)
+    @io.print "<polygon "
+    @io.print "points=\""
+    points.each do |p|
+      @io.print p[0],",",p[1]," "
+    end 
+    @io.print "\" "
+    print_args(**args)
+    @io.print " >"
+    print_title(title)
+    @io.puts "</polygon>"
+  end 
+  
+
+  def path(title: "",**args)
+    @io.print %(<path d=")
+    yield Path.new(self)
+    @io.print %(" )
+    print_args(**args)
+    @io.puts %( >)
+    print_title(title)
+    @io.puts %(</path>)
+  end 
+
+  class SVG::Path
+    def initialize(svg)
+      @svg = svg
+    end 
+
+    def m(x,y,relative=false)
+      @svg.print %(#{relative ? "m" : "M"} #{x} #{y} )
+    end 
+
+    def l(x,y,relative=false)
+      @svg.print %(#{relative ? "l" : "L"} #{x} #{y} )
+    end
+
+    def h(x,relative=false)
+      @svg.print %(#{relative ? "h" : "H"} #{x} )
+    end 
+
+    def v(y,relative=false)
+      @svg.print %(#{relative ? "v" : "V"} #{y} )
+    end 
+
+    def c(x1,y1,x2,y2,x,y,relative=false)
+      @svg.print %(#{relative ? "c" : "C"} #{x1} #{y1} #{x2} #{y2} #{x} #{y} )
+    end 
+
+    def s(x2,y2,x,y,relative=false)
+      @svg.print %(#{relative ? "s" : "S"} #{x2} #{y2} #{x} #{y} )
+    end 
+
+    def q(x1,y1,x,y,relative=false)
+      @svg.print %(#{relative ? "q" : "Q"} #{x1} #{y1} #{x} #{y} )
+    end 
+
+    def t(x,y,relative=false)
+      @svg.print %(#{relative ? "t" : "T"} #{x} #{y} )
+    end 
+
+    def a(rx,ry,x_axis_rot,large_arc_flag,sweep_flag,x,y,relative=true)
+      @svg.print %(#{relative ? "a" : "A"} #{rx} #{ry} #{x_axis_rot} #{large_arc_flag} #{sweep_flag} #{x} #{y} )
+    end 
+
+    def z()
+      @svg.print %(z )
+    end 
+  end 
+end 
+
+

data/lib/svg-lib.rb

@@ -0,0 +1,39 @@
+require "stringio"
+
+class SVG
+  attr :width
+  attr :height
+  def initialize(io,width,height)
+    @io = io
+    @width = width
+    @height = height
+  end 
+  def puts(*args)
+    @io.puts(*args)
+  end 
+  def print(*args)
+    @io.print(*args)
+  end 
+  def self.new(x:,y:,width:,height:,io: STDOUT,**args)
+    svg = super(io,width,height)
+    svg.print %(<svg viewBox="#{x} #{y} #{width} #{height}" version="1.1" xmlns="http://www.w3.org/2000/svg" )
+    svg.print_args(**args)
+    svg.print(" >")
+    yield svg
+    svg.puts "</svg>"
+  end
+  def print_args(**args)
+    args.each do |k,v|
+      @io.print k.to_s.gsub("_","-"),"=","\"",v,"\""," "
+    end 
+  end
+  def print_title(title)
+    @io.puts %(<title>#{title}</title>) if title != ""
+  end 
+end 
+
+require "shapes"
+require "text"
+require "containers"
+require "transform"
+require "plot2d"

data/lib/text.rb

@@ -0,0 +1,10 @@
+class SVG
+  def text(x:,y:,text:,title: "",**args)
+    @io.print %(<text x="#{x}" y="#{y}" )
+    print_args(**args)
+    @io.print " >"
+    print_title(title)
+    @io.print text
+    @io.puts "</text>"
+  end 
+end 

data/lib/transform.rb

@@ -0,0 +1,43 @@
+class SVG
+  class Transform
+    def initialize(io)
+      @io = io
+    end 
+
+    def translate(x,y)
+      @io.print %(translate(#{x} #{y}) )
+      self
+    end 
+
+    def rotate(d,x=nil,y=nil)
+      @io.print %(rotate(#{d} #{x} #{y}) )
+      self
+    end 
+
+    def scale(x,y=nil)
+      @io.print %(scale(#{x} #{y}) )
+      self
+    end 
+
+    def skewx(a)
+      @io.print %(skewX(#{a}) )
+      self
+    end 
+    
+    def skewy(a)
+      @io.print %(skewY(#{a}) )
+      self
+    end 
+
+    def matrix(a,b,c,d,e,f)
+      @io.print %(matrix(#{a} #{b} #{c} #{d} #{e} #{f}) )
+      self
+    end 
+  end 
+
+    def self.transform
+      io = StringIO.new 
+      yield Transform.new(io)
+      return io.string
+    end
+end 

metadata

@@ -0,0 +1,50 @@
+--- !ruby/object:Gem::Specification
+name: svg-lib
+version: !ruby/object:Gem::Version
+  version: 0.0.5
+platform: ruby
+authors:
+- Ricardo Nieto
+autorequire:
+bindir: bin
+cert_chain: []
+date: 2020-09-28 00:00:00.000000000 Z
+dependencies: []
+description: basic svg-lib ruby implementation
+email: nifr91@gmail.com
+executables:
+- eplot
+extensions: []
+extra_rdoc_files: []
+files:
+- bin/eplot
+- lib/containers.rb
+- lib/plot2d.rb
+- lib/shapes.rb
+- lib/svg-lib.rb
+- lib/text.rb
+- lib/transform.rb
+homepage:
+licenses:
+- MIT
+metadata: {}
+post_install_message:
+rdoc_options: []
+require_paths:
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement
+  requirements:
+  - - ">="
+    - !ruby/object:Gem::Version
+      version: '0'
+required_rubygems_version: !ruby/object:Gem::Requirement
+  requirements:
+  - - ">="
+    - !ruby/object:Gem::Version
+      version: '0'
+requirements: []
+rubygems_version: 3.1.4
+signing_key:
+specification_version: 4
+summary: svg-lib ruby
+test_files: []