[Moved] Need Matlab Code for Network Cell Optimization

Code C - [expand]
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
clc;
i=1:1:20;
a(i)=randi([13,2048],1,20);%generation of 20 random users
for i=1:1:20
str1=[num2str(a(i)) 'kbps is data rate of a' '[' num2str(i) ']'];
disp(str1);
end
t=round(rand(1,20));%date or voice determination
for i=1:20
  if t(i)>=0.5
  str=[ 'data for a[' num2str(i) ']'];
  disp(str);
  end
  if t(i)<0.5
      str=[ 'voice for a[' num2str(i) ']'];
  disp(str);
  end
end
x=randperm(20);%display the names
y=randperm(20);
names={'a', 'b', 'c', 'd', 'e', 'f', 'g', 'h', 'i', 'j', 'k', 'l', 'm', 'n', 'o', 'p', 'q', 'r' ,'s' ,'t'};
for k=1:length(x)
    text(x(k),y(k),names(k),'fontsize',18);
end
hold on;
scatter(x,y,'r','filled');
 
hold on;
%x(21)=0;
%y(21)=0;
%for i=1:1:20
%ang=0:0.01:2*pi; 
%r=2;
%xp=r*cos(ang);
%yp=r*sin(ang);
    %plot(x(i)+xp,y(i)+yp);
 %end
 %a=1;
for i=1:1:20
    f=0;
   for k=(i+1):1:20
        d=(x(k)-x(i)).^2+(y(k)-y(i)).^2;
        d1=sqrt(d);
  
        if (d1>1.414 || d1==4)
            ang=0:0.01:2*pi;
            r=0.66;
            xp=r*cos(ang);
            yp=r*sin(ang);
    plot(x(i)+xp,y(i)+yp,'r');
    f=1;
    break;
        end
        if d1==1.414
            ang=0:0.01:2*pi;
            r=0.99;
            xp=r*cos(ang);
            yp=r*sin(ang);
    plot((x(i)+xp)/2,(y(i)+yp)/2,'r');
    f=1;
    break;
        end
   end
           if  f==0
            ang=0:0.01:2*pi; 
            r=1.7;
            xp=r*cos(ang);
            yp=r*sin(ang);
            plot(x(i)+xp,y(i)+yp);
           end
end