Приложение 1. Код программы, реализующей поиск точек для текстов указанной рубрики.

public partial class MainWindow : Window

{

IClassificator iclass;

const string IndexPath = "C:/Users/eedgeeva/Desktop/Инд34_дерив_безморф";

SingleText st;

List<SingleText> listCommonSecurity = new List<SingleText>();

1. public MainWindow()

{

InitializeComponent();

//Запуск методов ПО CLASS

EngineService.Initialize();

iclass = EngineService.CreateClassificator();

iclass.Open(IndexPath);

//Получить справочник доступных рубрик и выгрузить как справку для пользователя с указанием внутреннего ID

List<RubricInfo> getRub = iclass.GetRubrics();

TextBox textBox1 = rubricsList;

foreach (RubricInfo r in getRub)

{

textBox1.AppendText("\r\n" + r.Id + "-" + r.Name);

}

enteredIndex.Clear();

}

2. private void Button_Click(object sender, RoutedEventArgs e)

{

List<RubricInfo> getRub = iclass.GetRubrics();

//Считывание из поля ID рубрики, интересующей пользователя

TextBox textbox2 = enteredIndex;

int rubricId;

if (!(Int32.TryParse(textbox2.Text, out rubricId)))

{

textbox2.Text = "Enter the rubric's ID!";

}

//Поиск имени рубрики по введенному ID для директории

string rubricName = null;

foreach (RubricInfo r in getRub)

{

if (r.Id == rubricId)

{

rubricName = r.Name;

break;

}

}

//Поиск директории расположения текстов выбранной рубрики

int filesNumber = Directory.GetFiles("C:/Users/eedgeeva/Desktop/диплом/Все рубрики/" + rubricName + "/").Length;

string[] files = Directory.GetFiles("C:/Users/eedgeeva/Desktop/диплом/Все рубрики/" + rubricName + "/");

float xEffect=0; //Переменная-показатель эффекта порядка для первой части текста

float yEffect = 0; //Переменная-показатель эффекта порядка для второй части текста

foreach (string f in files) //Для каждого текста рубрики запускается цикл формирования 3D-точки

{

string text = EngineService.ToText(System.IO.Path.GetFullPath(f));

List<RubricInfo> rubInfoFull = iclass.Classify(text, false);

string firstHalf = text.Substring(0, (int)text.Length / 2); //Первая часть

List<RubricInfo> rubInfoFirst = iclass.Classify(firstHalf, false); //Получение вероятностей классификации для первой части

string secondHalf = text.Substring((int)text.Length / 2, (int)text.Length / 2); //Вторая часть

List<RubricInfo> rubInfoSecond = iclass.Classify(secondHalf, false); //Получение вероятностей классификации для второй части

int indexFull = 0; //Поиск индекса вероятности для выбранной рубрики в списке вероятностей для полного текста

foreach (RubricInfo r in rubInfoFull)

{

if (r.Name == getRub[rubricId - 1].Name)

{

indexFull = rubInfoFull.IndexOf(r);

break;

}

}

int indexFirst = 0; //Поиск индекса вероятности для выбранной рубрики в списке вероятностей для первой части текста

foreach (RubricInfo r in rubInfoFirst)

{

if (r.Name == getRub[rubricId - 1].Name)

{

indexFirst = rubInfoFirst.IndexOf(r);

break;

}

}

int indexSecond = 0; //Поиск индекса вероятности для выбранной рубрики в списке вероятностей для второй части текста

foreach (RubricInfo r in rubInfoSecond)

{

if (r.Name == getRub[rubricId - 1].Name)

{

indexSecond = rubInfoSecond.IndexOf(r);

break;

}

}

//Для дальнейшего удобства использования CSV запись десятичных чисел ведется в него через точку, а не запятую

System.Globalization.CultureInfo customCulture =(System.Globalization.CultureInfo) System.Threading.Thread.CurrentThread.CurrentCulture.Clone();

customCulture.NumberFormat.NumberDecimalSeparator = ".";

System.Threading.Thread.CurrentThread.CurrentCulture = customCulture;

//Проверка безопасности на вхождение индексов в диапазоны Листов

if (indexFirst < rubInfoFirst.Count && indexFirst >= 0 &&

indexSecond < rubInfoSecond.Count && indexSecond >= 0 &&

indexFull < rubInfoFull.Count && indexFull >= 0)

{

//Создание объекта точки в трехмерном простарнстве

st = new SingleText(rubInfoFull[indexFull].Rank, rubInfoFirst[indexFirst].Rank, rubInfoSecond[indexSecond].Rank);

listCommonSecurity.Add(st); //Добавление точки в Лист всех точек

//Если точка значима в пользу первой части текста, отношение X/Y>3/2

if (rubInfoFirst[indexFirst].Rank / rubInfoSecond[indexSecond].Rank > (float)3 / 2)

{

xEffect = xEffect +1; //Подсчет количества значимых точек в пользу первой части текста

}

//Если точка значима в пользу второй части текста, отношение X/Y<2/3

if (rubInfoFirst[indexFirst].Rank / rubInfoSecond[indexSecond].Rank < (float)2 / 3)

{

yEffect = yEffect +1; //Подсчет количества значимых точек в пользу второй части текста

}

}

}

//Выгрузка всех точек рубрики в CSV файл для визаулизации

SaveArrayAsCSV(listCommonSecurity, "C:/Users/eedgeeva/Desktop/диплом/" + rubricName + "_result.csv");

TextBox textBox3 = resultTextBox;

textBox3.Text = (xEffect / listCommonSecurity.Count).ToString();//xValue - доля значимых точек в пользу первой части

TextBox textBox4 = resultForY;

textBox4.Text = (yEffect / listCommonSecurity.Count).ToString();//yValue - доля значимых точек в пользу второй части

}

3. public void SaveArrayAsCSV(List<SingleText> arrayToSave, string fileName)//Метод выгрузки точек в CSV

{

using (StreamWriter file = new StreamWriter(fileName))

{

foreach (SingleText item in arrayToSave)

{

file.WriteLine(item.First + ","+item.Second+","+item.Full);

}

}

}

public class SingleText //Класс для точек текстов

{

private float full;

public float Full { get => full; set => full = value; }

private float first;

public float First { get => first; set => first = value; }

private float second;

public float Second { get => second; set => second = value; }

public SingleText(float full, float first, float second)

{

Full = full;

Full = full;

First = first;

First = first;

Second = second;

Second = second;

}

}

ПРИЛОЖЕНИЕ 2

Пример запуска программы для рубрики 27-Реклама

ПРИЛОЖЕНИЕ 3

Окно программы Wolfram Mathematica, в которой производилась визуализация облаков точек. Пример на снимке экрана для рубрики «Реклама».

ПРИЛОЖЕНИЕ 4

Список рубрик, доступных на момент проведения исследования.

· Гаражное хозяйство, парковки, транспортно пересадочные узлы

· Безопасность и охрана правопорядка

· Капитальный ремонт многоквартирных домов

· Транспорт

· Работа с обращениями граждан

· Благоустройство территорий

· Природопользование и охрана окружающей среды

· Жилищно-коммунальное хозяйство

· Правосудие, прокуратура, адвокатура, нотариат, исполнение наказаний

· Градостроительство и архитектура

· Труд и занятость

· Предоставление государственных услуг

· Торговля и услуги

· Здравоохранение

· Имущественно-земельные отношения

· Содержание животных, ветеринария

· Культура

· Международные отношения, международное право

· Топливно-энергетическое хозяйство

· Государство, общество, политика

· Образование

· Семейная и молодежная политика

· Деятельность органов исполнительной власти города Москвы

· Архивное дело

· Жилищная политика

· Организационная работа

· Реклама

· Связь

· Социальное обеспечение

· Государственная гражданская служба и кадровое обеспечение

· Экономика и финансы

· Гражданское право

· Средства массовой информации

· Физическая культура и спорт

· Информационные технологии

· Объекты культурного наследия

· Промышленность

· Гражданская защита населения

· Туризм и гостиничное хозяйство

· Общественные связи

· Книгоиздание

· Межрегиональные связи, национальная политика, связи с религиозными организациями

· Сельское хозяйство

· Наука

· Предпринимательство

· Оборона

· Оформление города

· Природные ресурсы

· Геология, геодезия и картография

· Внешнеэкономические и зарубежные связи

· Местное самоуправление и муниципальная служба

· Регистрация актов гражданского состояния

Размещено на Allbest.ru