clear all; clc;close all

%porcentaje de grafeno en la celda
wg = rand(101,101);
%a=a.*(a>0.5);

%relacion largo/ancho
ratio = rand(101,101);

%orientacion largo x o y
dir = rand(101,101);
dir = (dir<=0.5)

[x,y] = meshgrid([0:100],[0:100]);

contourf(x,y,wg,1)