L'apprentissage automatique dans la négociation : théorie, modèles, pratique et algo-trading - page 1918

Nouveau commentaire
 
Aleksey Vyazmikin:

attraper

way <- "C:\\Users\\TARAS\\Desktop\\Test_Pred_2019.csv"  # ваш путь
dt <- read.csv(file = way,header = T,sep = ";") #  читаем файл
target <- dt$Target_100 #  целевую в отдельную переменную

dt <- dt[, ! colnames(dt)  %in% 
           c("Target_100_Buy","Target_100_Sell",
             "Time","Target_100")  ] #  удаляем не нужные колонки


#  роскоментируем и Устанавливаем нужные пакеты после чего эту строку можно удалить
#  install.packages(c("rgl", "car" , "umap"))


#  про umap
#https://cran.r-project.org/web/packages/umap/vignettes/umap.html
#https://github.com/ropenscilabs/umapr

library(umap)
um <- umap(dt,n_components=3)   
#  n_components=3  во сколько измерений уменьшаем данные, можно 100 можно 1
#  можно 333, но нам для 3 д надо трех мерное пространство поетому у нас n_comp=3
um.res <- um$layout #  наши три вектора выход 



#тут  все настройки по пакету  car
#  http://www.sthda.com/english/wiki/amazing-interactive-3d-scatter-plots-r-software-and-data-visualization
library(car)  # 3 d

target <- as.factor(target)  #   target нужен для того чтобы окрасить точки в цвет целевой

scatter3d(x = um.res[,1], 
          y = um.res[,2], 
          z = um.res[,3],
          groups = target,
          grid = FALSE, 
          surface = FALSE,
          ellipsoid = FALSE,
            bg.col = "black")






#===============================
#  ирисы фишера как пример

data(iris)
head(iris)
sep.l <- iris$Sepal.Length
sep.w <- iris$Sepal.Width
pet.l <- iris$Petal.Length

scatter3d(x = sep.l, 
          y = sep.w, 
          z = pet.l,
          groups = iris$Species,
          grid = FALSE, 
          surface = FALSE,
          ellipsoid = FALSE,
          bg.col = "black")



vous pouvez aussi jouer avec les paramètres umap, il y a des métriques, la proximité, les k-voisins

um <- umap(dt,n_components=3,
           n_neighbors=30,
           min_dist= 0.5)

Regardez la vinette, il y a beaucoup de choses là-bas.

 
mytarmailS:

aller à




Vous pouvez également jouer avec les paramètres umap, comme la métrique, la proximité, les k-voisins.

Regarde dans la vinette, il y a beaucoup de choses là-dedans.

Intéressant, merci ! À en juger par la photo, des déchets ? :)

Je n'arrive pas à le faire fonctionner.

Warning in install.packages :
  packages ‘rgl’, ‘car’, ‘umap’ are not available (for R version 3.5.0)

Je comprends que j'ai R périmé - comment le mettre à jour ? :)

 
Aleksey Vyazmikin:

Intéressant, merci ! À en juger par la photo, c'est de la camelote ? :)

Je n'arrive pas à le faire fonctionner.

Je comprends que mon R est périmé - comment le mettre à jour ? :)

Je pense que oui, je vais devoir le mettre à jour.

Je suppose que oui, c'est nul :))



Lorsque vous obtenez 1000 attributs significatifs, vous devez faire quelque chose.

 
NeuralNetwork:
Bonjour à tous. Voici le suivi de mon compte. Il montre tout pour faire taire tout le monde à jamais. Si vous êtes des perdants dans la vie, fermez-la et laissez les autres faire le travail. Les réseaux neuronaux fonctionnent, c'est vos cerveaux qui ne fonctionnent pas que vous prétendez le contraire !

pouvez-vous me donner un lien vers le code source sur githab ? peut-être qu'il y a une théorie là-bas.

 
Aleksey Vyazmikin:

Intéressant, merci ! À en juger par la photo, c'est de la camelote ? :)

il y a des amas de motifs dans un espace bidimensionnel.

mais cela pourrait aussi être une coïncidence, nous avons besoin de plus de données.

 
mytarmailS:

il y a quelques amas de motifs visibles dans l'espace 2D

mais ça pourrait aussi être aléatoire, nous avons besoin de plus de données.

Vous pouvez essayer des échantillons de différentes années.

J'ai téléchargé la version 4 de R comme on me l'a demandé et maintenant il me donne la chair de poule avec un argument quaternaire.

> #  роскоментируем и Устанавливаем нужные пакеты после чего эту строку можно удалить
> install.packages(c("rgl", "car" , "umap"))
Error in install.packages : 3 arguments passed to .Internal(unlink) which requires 4
 

Réinstallation, tentatives d'installation apparues, mais à nouveau il dit qu'il n'y a pas de paquet pour cette version.

> # роскоментируем и Устанавливаем нужные пакеты после чего эту строку можно удалить
> install.packages(c("rgl", "car" , "umap"))
Warning in install.packages :
  unable to access index for repository https://cran.rstudio.com/src/contrib:
  cannot open URL 'https://cran.rstudio.com/src/contrib/PACKAGES'
Warning in install.packages :
  unable to access index for repository https://cran.rstudio.com/src/contrib:
  cannot open URL 'https://cran.rstudio.com/src/contrib/PACKAGES'
Warning in install.packages :
  packages ‘rgl’, ‘car’, ‘umap’ are not available (for R version 4.0.2)
Warning in install.packages :
  unable to access index for repository https://cran.rstudio.com/bin/windows/contrib/4.0:
  cannot open URL 'https://cran.rstudio.com/bin/windows/contrib/4.0/PACKAGES'
L'installation semble passer par R, et non par RStudio.
 
Il semble fonctionner, mais peut-on sauvegarder ces modèles pour éviter de les recompter ?
 
Aleksey Vyazmikin:
Il semble fonctionner, mais peut-on sauvegarder ces modèles pour ne pas les recompter ?

Bien sûr, mais que devez-vous économiser exactement ?

J'ai R-3.6.3 )))) je ne savais même pas que la 4 est déjà)


my.file <- модель или что угодно


save(  my.file ,  file = "C:\\Users.........\\myfile.RDat"

load( file =  "C:\\Users.........\\myfile.RDat)
 
mytarmailS:

bien sûr, que devez-vous économiser exactement ?

J'ai d'ailleurs R-3.6.3 )))) je ne savais même pas qu'il y avait déjà un 4)


Eh bien, voici un modèle 3D, disons, qui s'ouvre dans une fenêtre séparée et même il n'y a aucun moyen comment cette capture d'écran, voici comment il peut être enregistré, et puis juste à partir d'une feuille blanche pour télécharger et apparaît un modèle ?

Comment interpréter ce type d'empilement ?

Au fait, comment régler les couleurs sur les classes de manière forcée - je ne comprends pas ce qui est quoi ?

1...191119121913191419151916191719181919192019211922192319241925...3399
Nouveau commentaire