目录
公历
黑色星期五
生物韵律
公历
在公历中,当年份为4的整数倍,但不是100的整数倍时,会出现闰年的现象。
y=40 mod(y,4)== 0 && mod(y,100)||mod(y,400)==0
输出当时的年、月、日、时、分、秒
f='%6d %6d %6d %6d %6d %9.3f\n' c=clock fprintf(f,c)
weekday - 星期几
此 MATLAB 函数 返回表示 D 中每个元素的星期几的数字。DayNumber = weekday(D)
[DayNumber,DayName] = weekday(D)
[DayNumber,DayName] = weekday(D,DayForm)
[DayNumber,DayName] = weekday(D,language)
[DayNumber,DayName] = weekday(D,DayForm,language)[d,w]=weekday(datenum(2011,8,2)) [d,w]=weekday(now)
datenum - 将日期和时间转换为日期序列值
此 MATLAB 函数 将输入数组 t 中的 datetime 或 duration 值转换为日期序列值。DateNumber = datenum(t)
DateNumber = datenum(DateString)
DateNumber = datenum(DateString,formatIn)
DateNumber = datenum(DateString,PivotYear)
DateNumber = datenum(DateString,formatIn,PivotYear)DateNumber = datenum(DateVector)
DateNumber = datenum(Y,M,D)
DateNumber = datenum(Y,M,D,H,MN,S)
黑色星期五
以400年为周期的历法下,某个月的13日正好是星期五的概率。
c = zeros(1,7); for y = 1601:2000 for m = 1:12 d = datenum([y,m,13]); w = weekday(d); c(w) = c(w) + 1; end end c bar(c) axis([0 8 680 690]) avg = 4800/7; line([0 8], [avg avg],'linewidth',4,'color','black') set(gca,'xticklabel',{'Su','M','Tu','W','Th','F','Sa'}) title('13th day of the month')
生物韵律
体力周期为23天,感情周期为28天,智力周期为33天。
clf-清空图窗
clf
删除当前图窗中具有可见句柄的所有子级。
clf(fig)
删除指定图窗中具有可见句柄的所有子级。
clf('reset')
删除当前图窗的所有子级,不管其句柄可见性如何。它还将图窗属性重置为默认值,但 Position、Units、PaperPosition 和 PaperUnits 属性除外。您也可以使用不带括号的clf reset
命令来重置图窗。
clf(fig,'reset')
删除指定图窗的所有子级并重置其属性。
f = clf(___)
可使用上述任一语法返回图窗。
shg
使当前图窗可见,并将其置于屏幕上所有其他图窗的前面。这与使用令figure(gcf)
一样。
initialize
if nargin == 0
t0 = fix(now-28);
else
t0 = datenum(birthday);
end
t1 = fix(now);
% Eight week time span centered on today.
t = (t1-28):(t1+28);
y = 100*[sin(2*pi*(t-t0)/23)
sin(2*pi*(t-t0)/28)
sin(2*pi*(t-t0)/33)];
plot(t,y)
finalize
% ------------------------------------
function initialize
clf
shg
axes('position',[.10 .30 .80 .50])
end
function finalize
line([t1 t1],[-100 100],'color','k')
line([t1-28 t1+28],[0 0],'color','k')
set(gca,'xtick',(t1-28):7:(t1+28))
datetick('x',6,'keeplimits','keepticks')
bot = text(t1-5,-130,['today: ' datestr(t1,1)]);
cbs = 'biorhythm(strrep(get(gcbo,''string''),''birthday:'',''''))';
top = uicontrol('style','edit','units','normal', ...
'position',[.35 .82 .32 .05], ...
'string',['birthday: ' datestr(t0,1)], ...
'fontsize',get(bot,'fontsize'), ...
'callback',cbs);
axis tight
leg = legend('Physical','Emotional','Intellectual');
set(leg,'pos',[.10 .02 .18 .12])
end
end % biorhythm