close all;
clc;
clear;

[data,varnames,casenames] = tblread('tungsten.txt','\t') ;

fid = fopen('tungstenArray.txt','w');


for i = 1 : size(data,1) 
    
    fprintf( fid , ['{' casenames(i,:)  ', %d  },']   , data(i,1)); 

end

fclose(fid);
