usefulcodes.blogspot.com

Do not Repeat the task

2012-01-06T10:38:00.000-08:00

In one of my work, the funny thing happened. The matlab could not save some of the finished task. It might be memory issues or what not... I am not sure. So, I wanted to run the program in such a way that it would not repeat the finished task while still running the new work.
This script does it!
:)

% inDIR is the directory containing the save work
if exist([inDIR],'dir')>0

disp(['not doing ::: ', inDIR])

writeout = ['echo "not doing ::: ', inDIR, '">>notes.txt'];
system(writeout)

% do nothing
else

% do it command here!!
end

Load matfiles

2011-11-09T11:48:00.000-08:00

Load the required files from a directory

clc
matDIR = '/.../matfiles/';
% workDIR = '/Volumes/3TB/.../AquaLand20/';
files = dir(matDIR);

% Remove the '.DS_Store' from the list
if strcmp(files(3).name, '.DS_Store')
files(3) = [];
end

% count =3;
row = 1;
for count= 3:length(files)

FNamebase=files(count).name;

inDIR =[matDIR, FNamebase];

if exist(inDIR)>0

load([inDIR ]);
time(row) = toc;
iter(row) = j-1;

disp(['Loaded! ',FNamebase]);

row = row+1
end
end

Using Imagemagick shell command to crop figures

2011-11-08T10:47:00.000-08:00

How to crop figure and save as png.
This is useful for cropping similar figures located in a folder.

Copy the code, save as cropfig.sh
and then run the cropfig.sh in your terminal...

#!/bin/bash
width=1800;
height=1680;
x_offset=502;
y_offset=40;
filelist=`ls | grep '.png'`
for image_file in $filelist
do
preextensionfilename=`convert $image_file -format "%t" info:`
convert $image_file -crop ${width}x${height}+${x_offset}+${y_offset} \
${preextensionfilename}_${width}x${height}.png
done

Remove the .DS_Store from the file list

2011-11-03T12:05:00.000-07:00

Sometimes, working on the filelist is troublesome because of the .DS_Store

WhereAqua = pwd;

files = dir(WhereAqua);

% Remove the '.DS_Store' from the list
if strcmp(files(3).name, '.DS_Store')
files(3) = []
end

To replace the un-necessary strings in filename

2011-09-12T09:28:00.001-07:00

Somehow, the filenames had infections with the extra '%E7%E7htm'.
What surprises me is that not all files had the same error.
So, I wrote a simple code to get rid of the extra characters in the filename/ extension.

% To replace   '%E7%E7htm' by 'htm'

% fn = '2Oct_09.%E7%E7htm'
list = dir;

jj = 1;
while jj < length ( list)
    fn = list(jj,1).name;
    [pathstr, name, ext] = fileparts(fn)
    if  strcmp(ext,'.%E7%E7htm') % ~list(jj,1).isdir
        
%         if strcmp(fn(9:15),'%E7%E7h')
          newfn=  strrep(fn, '%E7%E7h', 'h');
%         end
          system([ 'mv ' fn,' ' newfn])
        
%       disp('asdf')  
    end
    jj = jj+1;
end

Add Waving Nepali Flag widget in blogger

2011-09-07T14:39:00.000-07:00

This post is about how to add a widget to blogspot blogs.

The code is:

Twitter Follow badge for blogger with Nepal.gif Flag

2011-09-04T09:33:00.000-07:00

Cool GIF flag in blogspot blog with twitter follow button

Add the following code in the html code of your blog before </body> tag


<script src='http://www.go2web20.net/twitterfollowbadge/1.0/badge.js' type='text/javascript'/>
<script charset='utf-8' type='text/javascript'></script>


Now insert the html at any place in the body. For blogger blogs, I find it easy to add html element and add it there.

<a style="display:scroll;position:fixed;bottom:100px;left:1px;" href="http://www.twitter.com/nabinkm" target="_blank"><img height="97" style="border:0;" src="http://i.imgur.com/t2Iha.jpg" /></a>
<a href="http://www.twitter.com/nabinkm"> @nabinkm </a>

<a style="display:scroll;position:fixed;bottom:100px;left:24px;" href="http://www.twitter.com/nabinkm" target="_blank"><img style="border:0;" src="https://lh4.googleusercontent.com/-EIrgWSiVvwk/Taezn19w38I/AAAAAAAAHqU/zOrSSKtKrOs/s155/nepalflag.gif" height="100" width="75" /></a>

Hex code for Colormap, matlab

2011-08-31T16:11:00.000-07:00

I wanted to set the color code for the table to match with that of the figure.

colormap(jet(33))
labels = {'0','1','2','3'};
lcolorbar(labels,'fontweight','bold')
map2 = colormap; map2( 1, : ) = 1; colormap(map2)
cmap = colormap; % cmap nicely puts colormap into 3 col data

perCmap= (single(round(cmap.*255))); % convert to 255 scale
% You can use one of these options:
colorcell = ['rgb(' num2str(perCmap(1,1)), ',', num2str(perCmap(1,2)), ',', num2str(perCmap(1,3)) ')']

colorcell = ['#' (dec2hex(perCmap(1,1))), dec2hex(perCmap(1,2)), dec2hex(perCmap(1,3)) ]
% the second worked best for me

% I then set it to fid1 for txt file, which I was writing.
<td style="color:#ffffff" bgcolor="%s">
% where %s was the string set as colorcell for open fid fprintf(fid1,'<h1>%s <td/h1>', htmlH1);

Diff Tool Mac

2011-07-21T15:39:00.000-07:00

I have to say FileMerge is one of the best diff tool I have seen.
Just change the folder and do opendiff for two desired files.
I wanted to see the changes I made on two files by using diff, I was immediately sold!

The tool is already included in the system if you have Xcode environment set up

opendiff Jul20.m Jul21.m

Changing the bash prompt mac

2011-07-19T12:04:00.000-07:00

My bash prompt looked long and clumsy. So I wanted it short.

FIrst I opened the bash profile

nano .bash_profile
Then I added:
export PS1="My-Mac2:"

Write out, and voila!

Using simple unix command line in Matlab

2011-07-14T06:27:00.001-07:00

I was not aware that I could use the unix commands in the matlab command.
This can be done by having prompt in the command:

>> !rm *.png
>> !rm *.gif
>> !rm *.fig
>> !rm *.mat

Close mac Terminal after you are done

2011-07-06T14:37:00.000-07:00

The exit command:
It works if the following setting is done:

Terminal
>Preferences
>Settings
>Shell
>Prompt before closing: never
or
> When the shell exits:
select: close if the shell exited cleanly

The following kills the terminal:

killall Terminal

So, if I want to kill the terminal after I am done, I will simply add:
killall Terminal
instead of kill

Installing Spell Checker in TeXworks (Mac)

2011-06-22T16:37:00.000-07:00

Installing spell checker in TeXworks is going to be straightforward after I write this note.
The dicttionary for TeXworks is located at:
/Users/gajab/Library/TeXworks/dictionaries
where gajab is your username.

I went to the site:
http://code.google.com/p/texworks/wiki/SpellingDictionaries
and got the clue that

One easy source of dictionaries is the OpenOffice.org project, which uses the same spelling engine. There is a list of available dictionaries at http://wiki.services.openoffice.org/wiki/Dictionaries (see the All Language Packs download, or links to individual language dictionaries). Note that TeXworks only uses the spelling dictionaries (*.dic and *.aff) for each language ...

So I downloaded the dictionary file from
http://extensions.services.openoffice.org/en/dictionaries
It is located currently at:
http://extensions.services.openoffice.org/en/project/en_US-dict
However, the file is saved as .oxt. I simply renamed the package as a zip file
en_US.oxt >> en_US.zip
and unzipped the package (well, double click and rename along with the extension. It warns, but you can change the extension). It worked!!
The package contains:
META-INF description.xml en_US.aff info
README_en_US.txt dictionaries.xcu en_US.dic
WE only need .dic and .aff files. So I copied it to the library folder for the TeXworks.

cp ~/Downloads/en_US/en_US.aff /Users/gajab/Library/TeXworks/dictionaries
cp ~/Downloads/en_US/en_US.dic /Users/gajab/Library/TeXworks/dictionaries

The dictionary worked nicely after I restarted the TeXworks.

Full Screen Figure matlab

2011-05-25T14:32:00.000-07:00

Full Screen Figure/Image.

scrsz = get(0,'ScreenSize');

% Create figure
h = figure('Position',[1 scrsz(4) scrsz(3) scrsz(4)]);

Saving Big Matlab Figure with Subplots

2011-05-23T09:51:00.000-07:00

Saving Big Figure with Subplots can sometimes be tricky as the titles can be messy and the screen resolution might not help.

Here is what fixed my full-screen plot/image without destroying the titles.

fneps=[Figname,'.eps'];
set(gcf,'PaperPositionMode','auto')
print('-depsc2','-r200',fneps);

The format could be eps or png or fig... as preferred.

Making pretty Figures in Matlab

2011-05-20T09:20:00.000-07:00

I had a function calling these with gca option.

h = figure;
%plot

set(h,'LineWidth',1.12);
x_label = 'Class';
y_label = 'Range';
fig_title = char(DATAVAR);
% DATAVAR = variables{j}; from the loop and string list created as a cell structure.
% variables = {'Var1', 'Var2'} etc.
fig_title = regexprep(fig_title, '_', ' ');% To remove the underscores

xlabel(x_label, 'FontSize',[16], 'FontWeight' ,'bold');
ylabel(y_label, 'FontSize',[16], 'FontWeight' ,'bold');
newTitle = [fig_title]; % get the title from File Name (fn)
title(newTitle, 'FontSize',[20], 'FontWeight' ,'bold' );
set(gca,'LineWidth',[2.0], 'FontSize',[14],'FontWeight','bold')

Kile on Mac

2011-05-16T17:25:00.000-07:00

Somehow the Macports evaporated out of my system.
So, I end up reinstalling the Kile via macports.

export PATH=/opt/local/bin:/opt/local/sbin:$PATH
$ sudo port selfupdate

$ port upgrade outdated
Reinstalled KILE:
$ sudo port install kile

I think installing one of the program last week kicked it out... I will need to verify that.

Date and Time in File Name matlab

2011-05-14T15:34:00.000-07:00

Printing Months name as string for data analysis.
This also checks the existence of the file with the extension ".ext"; say dec_09.ext.

months={'jan','feb','mar', 'apr', 'may', 'jun', 'jul', 'aug', 'sep', 'oct', 'nov', 'dec'};
for iyear=5: 9

year_st = num2str(iyear,'%2.2i');

for i=1:length(months)
fn=[months{i} '_' year_st '.ext'];
if exist(fn, 'file')

disp(fn)
else
continue
end
end
end

Two instances of Matlab in Mac

2011-05-10T15:39:00.001-07:00

Typing this on the terminal does the trick!!

$ /Applications/MATLAB_R2010b.app/bin/matlab

Running two instances of matlab: Does it slow down the performance?
Will see...

Saving Matlab Figures as EPS

2011-05-09T12:22:00.000-07:00

Saving files as eps is slightly troublesome.

One could use various options. However, for my case, there was cropping in saveas option.

% Print to ps file
Figname = 'TestFigure'
fneps=[Figname,'.eps'];
set(gcf,'PaperPositionMode','auto')
print('-depsc2','-r200',fneps);
% print('-dpsc2','-zbuffer','-r200',fneps);
% saveas(gca,Figname,'psc2');

Cleaning my Keyboard

2011-05-06T09:54:00.000-07:00

Let me be litttle funny and produce my own garbage.

I would like to clean my keyboard and see what text does that produce. The work is inspired by the infinite monkey theorem and the dust accumulated on my keyboard.

Start cleanup...
---------
jjjjjjjjjjjjjhjhjhjhjhjhjhjhjhhjhjkjkkknnnmnmnmnmnbnbbbvvvvgvgvgvgfgcffcfcfcfcfcfxxxdxdxxxzzszszszszssawawawawqawqqqqQq q 2qwq3w3w3w4ew4e4ererrdrrrrtrftftyyuyuhuhuhuiuiujiijioioioopopoplplplpl[;[;[[;;];];]']']'
'lmn kn bivcygctfxreszeedsxttgvjb ngyff6tr5rdsxzxewa2wq 1QArdcub omn l,'.,'./.mpn-vccxtdxz5eszewa4esz on ],
/ pob uc x
/?///./....// 1 1///?';lmm, 1q 21 1`12q2q23w3w43e4e4e5r5r5r6t6t7t7yy8u8u9iu9i0i0o-o-p=\]\
.m v ctzeqq 1 1 1` 1` 112-009u8764567lmloiuiucxrrseswasasdxgvchbjm , , ./...,;,;;;l[;[;[';\

---------
End of cleanup

Note: When I was blowing the dust on the keyboard, the force was not sufficient to push any keys and those are un noticed in the process. About 40 microgram of dust was collected in due process.

Accessing variables as string (matlab)

2011-05-05T10:59:00.000-07:00

Easy access to the variables via evaluation command

variables = {'a', 'b','c'}
a = 22;
% operations
eval(variables{1})+2
% works

Pie chart with label and percentage

2011-05-04T12:55:00.000-07:00

Wanted to have a pie chart with class label as well as the percentage.
This does the job.

class = [Count1 Count2 Count3 Count4];

b = (round(class/sum(class)*100))
% explode = [0,0,1]; % well you can explode it
h=pie(class, {['Class 1 (',num2str(b(1)),'%)'],['Class 2 (',num2str(b(2)),'%)'], ['Class 3 (',num2str(b(3)),'%)'],['Class 4 (',num2str(b(4)),'%)']});
% pie(class,{'Class 1 ','Class 2','Class 3 ', 'Class 4 '})
% well try pie3 too

Extract href link item from the html source matlab

2011-05-02T20:22:00.001-07:00

Extract href link item from the html source by using matlab.
The result is that the link is saved in a txt file.

%%
% Search for number of string matches per line.
% replace "href" tag by "ctrl H + manual line break".. in doc ..
% makes life easy
home
clc
filename = 'textsrc.txt';
literal = ' <a href="';

fid = fopen(filename, 'rt');
bbase = 'dsave2'
fid_sh = fopen([bbase '.txt'],'w');

y = 0;
jj = 1;
while feof(fid) == 0
tline = fgetl(fid);

matches = findstr(tline, literal);
num = length(matches);
if num > 0
y = y + num;
% fprintf('%s\n',tline);
fprintf(fid_sh, '%s \n', tline);
end
jj = jj+1;
end
fclose(fid);
fclose(fid_sh)
% this file generates the output on the screen which needs to be copied and
% saved as
% dsave2.txt
% Which will be further operated by refinestr.m

Creating HTML files with favorite pages loaded in matlab

2011-05-02T19:56:00.000-07:00

I have saved the pages with sublink such as
http://usefulcodes.blogspot.com/2011/03/how-to-block-website-in-macos.html
http://usefulcodes.blogspot.com/search/label/matlab
etc...

The first part of the link (below) is the home page. The file structure is saved as text array so that textread function in Matlab reads the content as the cell structure. The structure can be accessed iteratively by file{j}.

filename = 'dsave1.txt';
j = 1;

file = textread(filename, '%s', 'delimiter', '\n', ...
'whitespace', '');

for j = 1:length(file)
link = ['http://www.urlurl.com/' file{j}]
% end

file_name = [num2str(j) '.htm'];

fid =fopen(file_name,'wb'); %_id=%s will do the job
fprintf(fid, '<html><head><title>1</title></head><body>');

fprintf(fid, '<iframe name="FRAME" src="%s" width="1040" height="700" frameborder="0" scrolling="no"></iframe></body></html>',link);

fclose(fid);

j = j+1;

end

Just open with Chrome. Tada!