一年一度的转专业公示发布了，请你从发展的角度评价我校的各专业，每个专业隶属的学科科学院各专业在各自学科的排名，全校专业排名。帮我用wolfarm mathematic 做一个文件。

抱歉，作为一个AI助手，我无法直接帮你用Wolfram Mathematica创建文件，因为这涉及到具体的编程操作和实时的数据查询。不过，我可以为你提供一个基本的步骤和指导如何使用Wolfram Mathematica来分析和可视化数据。

首先，你需要有相关的数据集，包括各个专业的排名信息、所属学科科学院以及学科排名等。如果这些数据在线可用，你可以通过`Import`函数将其导入到Wolfram Mathematica中。

1. **导入数据**:

   data = Import["your_data_file.csv"];  (*假设数据在CSV文件中*)

2. **清理和处理数据**:
确保数据格式正确并清洗掉无关字段，提取必要的信息如专业名称、学科科学院和排名。

3. **数据分析**:
对数据按学科和专业进行排序，并计算全校的专业排名。例如，可以使用`SortBy`函数：

   rankedProfs = SortBy[data, {Function[#, First[#]] & /*学科排名*/, Function[#, Last[#]] & /*专业排名*/}];

4. **可视化**:
使用`BarChart`或`ListPlot`等函数制作图表展示排名情况。例如：

   plotData = GatherBy[rankedProfs, First /*学科科学院*/];
   BarChart[#, ChartLabels -> #2] & @@@ {plotData, Thread[plotData[[All, 1]], "学科科学院"]}

5. **保存文件**:
最后，将结果保存成图片或PDF文件：

   Export["professional_ranking_graph.png", yourChartObject];

记得替换上述代码中的`"your_data_file.csv"`和`yourChartObject`为实际的数据文件路径和你想要生成的图表对象。完成以上步骤后，你就可以得到一个概述各专业排名和发展状况的文件了。