(Добро пожаловать в StackOverflow Murray, рад вас видеть здесь!)
Это не прямой ответ на ваш вопрос, но я думаю, что вам может быть полезно узнать, что пакет << AuthorTools`
включаетфункциональность для сравнения ноутбуков.Оцените следующее, чтобы открыть («скрытую») документацию:
NotebookOpen@
FileNameJoin[{$InstallationDirectory, "AddOns", "Applications",
"AuthorTools", "Documentation", "English", "AuthorToolsGuide.nb"}];
Затем вы можете сравнить их, используя CreateDocument@NotebookDiff[notebook1, notebook2]
, или, возможно, используя более удобный
CreateDocument@NotebookDiff[SystemDialogInput["FileOpen"], SystemDialogInput["FileOpen"]]
, который будетПозволяет легко выбирать файлы.
Кроме того, вы можете открыть два блокнота на передней панели и использовать эту небольшую панель управления:
Dynamic@Column[
{PopupMenu[Dynamic[nb1],
Thread[Notebooks[] -> NotebookTools`NotebookName /@ Notebooks[]]],
PopupMenu[Dynamic[nb2],
Thread[Notebooks[] -> NotebookTools`NotebookName /@ Notebooks[]]],
Button["Show differences",
CreateDocument@NotebookTools`NotebookDiff[nb1, nb2]]}
]

Интересно отметить, что в Mathematica 8 есть некоторая недокументированная функциональность, связанная с ноутбуком, в контексте NotebookTools
, включая функцию NotebookTools`NotebookDiff[]
.
Связанный вопрос: IsВозможно ли вызвать функцию сравнения Mathematica из командной строки?