β. Carotene

來自臺灣
繁中出沒注意=w=
主萌韓葉/周葉/傘修/喻黃
BG覺得王柔/韓楚/肖戴特別好吃

[全職][韓葉] 不只是惡作劇

* 繁中出沒注意

* 今日關鍵詞:匿名消息

* 記得打開MATLAB來玩~

 @韩叶深夜60分钟 


        韓文清最近常常收到不具名的訊息,訊息內容不固定,有時是方程式,有時是一大篇看似亂碼的東西,讓韓文清摸不著頭緒,唯一看的懂的,可能只有使用者的IP吧,但查了也沒意義,因為那是透過VPN傳送的假IP,也就是說,光憑那些訊息,完全不知道發信人是誰。

        韓文清原本不以為意,發信人卻變本加厲,除了亂碼,有時也會傳送從報紙或雜誌剪下的文字拼湊的句子,像是──

        猜猜我是誰?

        真笨啊你一定不知道。

之類的惡作劇文章,如此幼稚的話語經常讓韓文清想到一個人,但又覺得那傢伙不會無聊成這樣。

        沒想到韓文清的置之不理居然逐漸讓朋友們困擾。

        比如說,有天張新杰打開宿舍信箱時,發現大把大把的信件滾落,收件人全都是韓文清,張新杰以為是新來的工讀生把信件放錯位置,後來才知道當天所有人的信箱都被塞滿了。

        又比如說,有天張佳樂打開訓練室電腦時,發現電腦開機時自動被導向一個病毒程式,電腦沒有中毒,只一直嗶嗶叫,並有文字顯示要輸入韓文清的生辰八字才能回去正常桌面。

        張佳樂嚇了一跳,立刻舉手反應,韓文清遭受騷擾的事情才曝光。

        「隊長,你要不要把收過的匿名訊息整理一下?不然這樣下去不行。」張佳樂聽完韓文清無奈的陳述,按奈住笑意說。

        「隊長,造成大家的困擾的確不好。」張新杰難得附和。

        韓文清緊皺眉頭,無奈的哼了一聲,打開至今收到的匿名信件,整理成壓縮檔寄給張新杰。

        張新杰打開已初步整理過的檔案,稍稍按自己的堅持又統整了會,「亂碼文件六封、奇怪的數學公式是四封,報紙剪貼……十七封,全都是無聊的內容,前陣子佔滿大家信箱的則都是白紙……看起來關鍵在亂碼和公式。」

        「誰有這心思弄這玩意啊,倒是這些剪貼很有老葉的作風。」張佳樂湊過去看,立刻覺得頭昏眼花。

        「應該不是,他在網遊裡興風作浪就花掉快全部時間了。」張新杰沉吟。

        「但你不覺得口吻很像嗎?我越看越覺得這些信後面有葉修在奸笑了。」張佳樂語氣誇張的說。

        「不如把這些內容全都丟進搜尋引擎怎麼樣?」聽著他們討論,宋奇英難得無法把注意力放在訓練上,也忍不住湊過去。

        「也可以。」說著張新杰從亂碼開始貼,畢竟說是亂碼卻仍是從中文字組成的,感覺上比較能看出端倪。

        然而卻什麼都沒有,亂碼丟進去還是亂碼,沒有任何意義。

        「那……我用公式搜尋了。」張新杰無奈的重複第九次一模一樣的動作,這次搜尋引擎跑出來的結果,讓眾人驚訝的瞪大眼。

        sqrt(1-(abs(x)-1)^2),arccos(1-abs(x))-pi是第一個詭異的公式,搜尋引擎居然跑出一個彩色的愛心圖案。

        「該不會是瘋狂粉絲吧?」張佳樂揉揉眼,不太相信自己看到什麼。

        話說回來這搜尋引擎也太神奇了。

        張新杰按奈古怪的感受,貼了第二個公式(sqrt(cos(x))*cos(200x)+sqrt(abs(x))-0.7)*(4-x*x)^0.01, sqrt(9-x^2),-sqrt(9-x^2) from -4.5 to 4.5,跑出來一個更華麗的愛心圖案,看到這玩意,連韓文清的表情都有些扭曲。

        「可能真的是粉絲示愛吧,」張新杰推了推眼鏡,顫抖的手持滑鼠指向第三封信,這回打開的不只是數學公式,看起來像程式碼,「這……要找程式部門的人來幫忙嗎?」說著他又打開第四封,也是落落長的程式碼。

        韓文清嘴角抽搐的點點頭,都已經決定要解謎了,當然要執行到底。

        打了通電話請工程師幫忙後,韓文清便將充滿公式與亂碼的信件寄了過去。

        看起來這樣的內容對工程師是小case,不到兩小時便回信了,附帶幾張圖片與一個網址,有了適才的衝擊,韓文清決定先打開網址,再看圖片。

        網頁標題是文字雲產生器,工程師簡短說明說把看似亂碼的信件傳進去就可以解析了,思考了會,韓文清決定晚上回到宿舍再來看,於是他點開圖片,第一章是由較短的程式碼繪成,工程師並貼心的說只要有MATLAB,就能執行,畫出一樣的東西。

        第一張圖一樣是個愛心圖片,比搜尋引擎顯示的2D平面圖厲害得多,是立體的愛心圖,發愣了會,韓文清點開最後一張,雖然有心理準備,華麗的畫面仍讓他心驚。

        最後一張圖是個動畫,愛心與前一張一樣是個立體愛心圖,只是愛心繪製的過程一步步的產生,還加上文字,合起來就是……


        I<3 W-Q

        我愛文清。

        如此結果讓張佳樂不客氣的笑彎了腰,韓文清驀地紅了耳根,刻意輕咳一聲離開訓練室。

        「這粉絲鐵定很愛隊長吧,這麼費工的事都做得出來。」張佳樂大笑道。

        「……應該吧。」張新杰肩膀一抽一抽的,他覺得這麼取笑韓文清很不道德,畢竟粉絲的誠意無限,只是……真的不好忍啊。

 

        回到宿舍的韓文清,順著工程師所寫的方式,把亂碼一篇篇上傳到文字雲產生器,結果產生的瞬間,讓他覺得只有自己看到真是太好了。

        將每篇亂碼用文字雲擷取出現頻率最高的字眼合起來,是「韓文清我好喜歡你嫁給我好不好BY葉修」。

        就在他思索署名的真實性時,來自假IP的匿名信件又來了,看到是亂碼,韓文清不假思索的把他丟進文字雲產生器。

        「解出來沒老韓」是這回統計出來最高的六個字,其中兩兩出現次數相等。

        看到這語氣,韓文清相信訊息來自葉修的程度,提高了三成。

        這傢伙……韓文清忍不住搖頭,嘴角無法克制的上揚。

 

        「我說阿修你為什麼要用這種方式告白呢?」看到葉修竊笑著寄出匿名信,蘇沐橙不解的問。

        「好玩啊。」葉修聳聳肩。

        「韓隊似乎不覺得好玩,」唐柔正在刷微博,「他把你托羅輯弄的動畫上傳了,還配上一張咬牙切齒的表情。」

        「這週末不見不散,哇喔韓隊居然這麼說。」聽到唐柔的話,蘇沐橙連忙也打開微博,兩個女孩笑得花枝亂顫。

        「老韓一定問了他們霸圖的工程師,我才不相信他有本事解出羅輯的數學程式。」葉修笑了笑,轉發韓文清的圖片。

        興欣葉修_V

        沒問題啊~說來老韓喜歡我的禮物嗎?// 霸圖韓文清_V: 這週末不見不散(咬牙切齒.jpg) /gif./

        沒想到韓文清再度轉發葉修的文章。

        霸圖韓文清_V

        還可以//沒問題啊~說來老韓喜歡我的禮物嗎?// 霸圖韓文清_V: 這週末不見不散(咬牙切齒.jpg) /gif./

        當晚職業選手們紛紛轉貼韓文清的文章,或予以祝福或表示需要墨鏡,總之是歡樂至極,透過選手們間接證實此事真實性的粉絲們,紛紛表示細思恐極。


======

公式和程式碼都是上網抓的XD

我不會用MATLAB存GIF所以就拿JPG蒙混過關了(遮臉

數學公式可以丟進菇狗

圖片動畫的MATLAB程式碼如下,有MATLAB的小夥伴可以玩玩看,直接貼上執行就可了喔XD

% volume data

[X,Y,Z] = meshgrid(linspace(-3,3,101));

F = -X.^2.*Z.^3 - (9/80).*Y.^2.*Z.^3 + (X.^2 + (9/4).*Y.^2 + Z.^2 - 1).^3;


% initialize figure

hFig = figure('Menubar','none', 'Color','w');

pos = get(hFig, 'Position');

set(hFig, 'Position', [pos(1)-0.15*pos(3) pos(2) 1.3*pos(3) pos(4)]);


% initialize axes

hAxes = axes('Parent',hFig, 'DataAspectRatio',[1 1 1], ...

    'XLim',[30 120], 'YLim',[35 65], 'ZLim',[30 75]);

view(-39,30);

axis off


% Fill the inside of the mesh with an isosurface to

% block rendering of the back side of the heart

patch(isosurface(F,-1e-3), 'FaceColor','w', 'EdgeColor','none')

hidden on    % hidden surface removal


% contours in the y-z plane

for iX = [35 38 41 45 48 51 54 57 61 64 67]

    plane = reshape(F(:,iX,:), [101 101]);

    cData = contourc(plane, [0 0]);

    xData = iX.*ones(1,cData(2,1));

    line(xData, cData(2,2:end), cData(1,2:end), ...

        'Color','r', 'Parent',hAxes)

    pause(.1)

end


% contours in the x-z plane

for iY = [41 44 47 51 55 58 61]

    plane = reshape(F(iY,:,:), [101 101]);

    cData = contourc(plane, [0 0]);

    yData = iY.*ones(1,cData(2,1));

    line(cData(2,2:end), yData, cData(1,2:end), ...

        'Color','r', 'Parent',hAxes)

    pause(.1)

end


% contours in the x-y plane

for iZ = [36 38 40 42 44 46 48 50 52 54 56 58 60 62 64 66 69 71]

    plane = F(:,:,iZ);

    cData = contourc(plane, [0 0]);

    startIndex = 1;

    if size(cData,2) > (cData(2,1)+1)

        startIndex = cData(2,1)+2;

        zData = iZ.*ones(1,cData(2,1));

        line(cData(1,2:(startIndex-1)), cData(2,2:(startIndex-1)), zData, ...

            'Color','r', 'Parent',hAxes)

    end

    zData = iZ.*ones(1,cData(2,startIndex));

    line(cData(1,(startIndex+1):end), cData(2,(startIndex+1):end), zData, ...

        'Color','r', 'Parent',hAxes)

    pause(.1)

end


% text

props = {'FontWeight','bold', 'FontAngle','italic', 'FontSize',100};

pause(.2)

text(7,50,70, 'I', props{:})

pause(.5)

text(80,50,43, 'W-Q', props{:})

pause(.2)


% xyz axes

line([20 80], [50 50], [52.5 52.5], 'Color','k')

line([50 50], [20 80], [52.5 52.5], 'Color','k')

line([50 50], [50 50], [30 80], 'Color','k')

text(20,50,50, 'x')

text(48,20,50, 'y')

text(45,50,80, 'z')

drawnow


% equation

props = {'FontSize',10, 'Interpreter','latex'};

text(20,65,30, '$(x^2+9/4y^2+z^2-1)^3 - x^2z^3-9/80y^2z^3=0$', props{:});

text(30,45,30, '$-3 \leq x,y,z \leq 3$', props{:});

drawnow


saveas(1, 'pic.jpg')


© β. Carotene | Powered by LOFTER