파일의 날짜에 따른 파일의 타임 라인 생성
디렉토리의 파일과 마지막 수정 날짜에 대한 FileSystemMap을 작성합니다.
In[1]:=
files = FileSystemMap[FileDate,
FileNameJoin[{$HomeDirectory, "Downloads"}]]
In[2]:=
<|"2 page flowing Tutorial Template.doc" ->
DateObject[{2016, 3, 2}, TimeObject[{9, 53, 1.`}, TimeZone -> -4.`],
TimeZone -> -4.`],
"2 page step-by-step Tutorial Template.doc" ->
DateObject[{2016, 3, 2},
TimeObject[{9, 52, 57.`}, TimeZone -> -4.`], TimeZone -> -4.`],
"Files.tar.gz" ->
DateObject[{2016, 7, 8},
TimeObject[{12, 36, 45.`}, TimeZone -> -4.`], TimeZone -> -4.`],
"desktop.ini" ->
DateObject[{2016, 5, 18},
TimeObject[{12, 50, 45.`}, TimeZone -> -4.`], TimeZone -> -4.`],
"M-WIN-L-11.0.0-5555928.iso" ->
DateObject[{2016, 6, 29},
TimeObject[{13, 2, 9.`}, TimeZone -> -4.`], TimeZone -> -4.`],
"SenseHatBlogPost.txt" ->
DateObject[{2016, 2, 24},
TimeObject[{12, 29, 50.`}, TimeZone -> -4.`], TimeZone -> -4.`],
"ubuntu-15.04-snappy-armhf-raspi2.img" ->
DateObject[{2016, 4, 22},
TimeObject[{22, 53, 2.`}, TimeZone -> -4.`], TimeZone -> -4.`],
"ubuntu-15.10-desktop-amd64.iso" ->
DateObject[{2016, 2, 24},
TimeObject[{2, 6, 29.`}, TimeZone -> -4.`], TimeZone -> -4.`]|>
디렉토리 내의 각 파일이 언제 변경되었는지에 대한 타임 라인을 만듭니다.
In[3]:=
TimelinePlot[files]
Out[3]=
2016년 6월 1일 이전 생성 된 파일을 꺼내 그들을 별도로 플롯합니다.
In[4]:=
TimelinePlot[Select[files, (# < DateObject[{2016, 6, 1}]) &]]
Out[4]=