Как правило, кривая обучения строит график производительности модели (как некоторый количественный показатель, например, скажем, «точность») по отношению к различным объемам обучающих данных.
Итак, вам нужно будет выбрать способ оценки своих Doc2Vec
моделей. (Возможно, это будет связано с использованием векторов документов в качестве входных данных для другого классификатора или чего-то еще.) Затем вам потребуется заново создать модель Doc2Vec
с различными размерами обучающих наборов, оценивая каждый из них, и подача точек данных (corpus_size, score)
на график.
Обратите внимание, что gensim
включает в себя класс-оболочку для добавления обучающего шага Doc2Vec
в конвейер scikit-learn
:
https://radimrehurek.com/gensim/sklearn_api /d2vmodel.html
Итак, вы можете заменить простой estimator
вашего существующего кода на многошаговый конвейер, включая D2VTransformer
в качестве шага. Таким образом, вы бы создали график кривой обучения способом, очень похожим на ваш существующий код.
Эта ссылка имеет всю информацию, которую Вы хотите знать.
ОБНОВЛЕНИЕ: Вот минимальный рабочий образец для интегрированной аутентификации с SQL Server. Необходимо использовать ConnectionProperties объекта таблицы для установки параметров соединения.
Dim app As New CRAXDDRT.Application
Dim rpt As CRAXDDRT.Report
Dim tbl As CRAXDDRT.DatabaseTable
Dim tbls As CRAXDDRT.DatabaseTables
Set rpt = app.OpenReport("C:\report\repotest.rpt")
For Each tbl In rpt.Database.Tables
tbl.ConnectionProperties.DeleteAll
tbl.ConnectionProperties.Add "Provider", "SQLOLEDB"
tbl.ConnectionProperties.Add "Data Source", "localhost"
tbl.ConnectionProperties.Add "Initial Catalog", "testdb"
tbl.ConnectionProperties.Add "Integrated Security", "True" ' cut for sql authentication
'tbl.ConnectionProperties.Add "User Id", "myuser" ' add for sql authentication
'tbl.ConnectionProperties.Add "Password", "mypass" ' add for sql authentication
Next tbl
'This removes the schema from the Database Table's Location property.
Set tbls = rpt.Database.Tables
For Each tbl In tbls
With tbl
.Location = .Name
End With
Next
'View the report
Viewer.ReportSource = rpt
Viewer.ViewReport
Какую версию кристалла Вы используете?
В мире .NET я обычно передаю набор данных отчету, как emoreau говорит здесь.
Тем путем Ваше соединение установлено из кода, а не кристалла и может быть сохранено в глобальном свойстве соединения. Однако это - .NET. Я думаю, что или версия кристалла, который Вы имеете, должна иметь схожую функциональность ИЛИ Emoreau, может иметь пример того, как сделать это в VB6 в версии, которую Вы используете.
Надеюсь, что get's Вы запустили.