plotForce

function plotProximal()
  desired_distance = 6.0;
  steepness_potential = 3.0;
  max_range = 1.4 * desired_distance;
  strengh_potential = 1.5;
  sigma = desired_distance / 1.122;

  num_steps = 50;
  step = 0.1;
  distances = [];
  for i = 1:num_steps
    distances = [distances, desired_distance + step * (i - num_steps / 2)];
  endfor

  values = [];
  for i = distances
    values = [values, -4 * steepness_potential * strengh_potential / i * ( 2 * power(sigma / i, 2 * steepness_potential) - power(sigma / i, steepness_potential))];
  endfor

  hold;
  plot(distances, values);
  plot([desired_distance - desired_distance/2,desired_distance + desired_distance/2],[0,0]);
  ylabel("Proximal force value");
  xlabel("Distance (m)");
  saveas(1, "force.png");
endfunction