... Función para aplicar Softmax con estabilidad numérica
FUNCTION Softmax(matrix)
LOCAL rows := Len(matrix)
LOCAL cols := Len(matrix[1])
LOCAL result := Array(rows, cols)
local i, j, max_val, sum_exp, exp_values
FOR i := 1 TO rows
max_val := hb_ArrayMax(matrix[i])
sum_exp := 0
exp_values ...
Search found 289 matches: result
Searched query: result
- Sat Jan 11, 2025 8:23 pm
- Forum: Artificial Intelligence examples
- Topic: CLASS Transformer
- Replies: 2
- Views: 43
- Sat Jan 11, 2025 8:06 pm
- Forum: Artificial Intelligence examples
- Topic: CLASS Transformer
- Replies: 2
- Views: 43
Re: CLASS Transformer
... Función para aplicar Softmax con estabilidad numérica
FUNCTION Softmax(matrix)
LOCAL rows := Len(matrix)
LOCAL cols := Len(matrix[1])
LOCAL result := Array(rows, cols)
local i, j, max_val, sum_exp, exp_values
FOR i := 1 TO rows
max_val := hb_ArrayMax(matrix[i])
sum_exp := 0
exp_values ...
FUNCTION Softmax(matrix)
LOCAL rows := Len(matrix)
LOCAL cols := Len(matrix[1])
LOCAL result := Array(rows, cols)
local i, j, max_val, sum_exp, exp_values
FOR i := 1 TO rows
max_val := hb_ArrayMax(matrix[i])
sum_exp := 0
exp_values ...
- Thu Jan 09, 2025 9:16 pm
- Forum: FiveWin for Harbour/xHarbour
- Topic: BTNBMP image
- Replies: 0
- Views: 85
BTNBMP image
... 195,195,185)
oImage:nDeepFocusRect := 0
oImage:nClrFocusRect := RGB(245,245,235)
oImage:ltransparent:=.t.
oImage:lMOver = .f.
I have this result
https://i.postimg.cc/kgrDYWTT/test.png
this figure below is to make you understand what I would like, enlarge the image to the edges and the ...
oImage:nDeepFocusRect := 0
oImage:nClrFocusRect := RGB(245,245,235)
oImage:ltransparent:=.t.
oImage:lMOver = .f.
I have this result
https://i.postimg.cc/kgrDYWTT/test.png
this figure below is to make you understand what I would like, enlarge the image to the edges and the ...
- Mon Dec 30, 2024 1:52 pm
- Forum: FiveWin for Harbour/xHarbour
- Topic: Lost connection to MySQL server during query
- Replies: 40
- Views: 15929
Re: Lost connection to MySQL server during query
... to do it
5) Connection fail
A first test is try to execute same query on HEIDISQL or anything else, with same user and server, to check result.
If query is the problem, execute again will not solve problem.
Another common problem using connections on Windows:
Before Windows XP service ...
5) Connection fail
A first test is try to execute same query on HEIDISQL or anything else, with same user and server, to check result.
If query is the problem, execute again will not solve problem.
Another common problem using connections on Windows:
Before Windows XP service ...
- Wed Dec 18, 2024 4:54 pm
- Forum: FiveWin for Harbour/xHarbour
- Topic: Browse of my ADO Class
- Replies: 59
- Views: 7512
Re: Browse of my ADO Class
As a comment:
on FW 24.10 I do not have same result with multithread.
May be when mixed with GTWVG can't be same solution for normal use.
No problem, I continue with FW 24.09
An error today (FW 24.09):
Memory:4.00 GB
Mem.VM:3.80 GB
Windows: Windows 10 10.0.19045
Harbour: Harbour 3.2.0dev ...
on FW 24.10 I do not have same result with multithread.
May be when mixed with GTWVG can't be same solution for normal use.
No problem, I continue with FW 24.09
An error today (FW 24.09):
Memory:4.00 GB
Mem.VM:3.80 GB
Windows: Windows 10 10.0.19045
Harbour: Harbour 3.2.0dev ...
- Tue Nov 26, 2024 11:10 am
- Forum: FiveWin for Harbour/xHarbour
- Topic: Sorting strings in a NON logical way
- Replies: 5
- Views: 936
Re: Sorting strings in a NON logical way
... 4X" } // All posible options AND also in the order I would like them.
ASort( aArray1, , , { |x, y| AScan(aOrder, x) < AScan(aOrder, y) } )
Result =
aArray1 := { "S", "M", "XL", "2X", "3X" }
// save result back to dbf with correct functions.. (=ok)
I was not able to use the correct aSort ...
ASort( aArray1, , , { |x, y| AScan(aOrder, x) < AScan(aOrder, y) } )
Result =
aArray1 := { "S", "M", "XL", "2X", "3X" }
// save result back to dbf with correct functions.. (=ok)
I was not able to use the correct aSort ...
- Mon Nov 25, 2024 11:30 pm
- Forum: FiveWin for Harbour/xHarbour
- Topic: Sorting strings in a NON logical way
- Replies: 5
- Views: 936
Re: Sorting strings in a NON logical way
... 2X" , "3X" }
// Sorteer aArray1 op basis van de volgorde in aOrder
ASort( aArray1, , , { |x, y| AScan(aOrder, x) < AScan(aOrder, y) } )
xbrowser(aArray1)
RETURN Nil
The result is
aArray1 := {"S","M","L","2X","3X"},
which is exactly the same as aArray1 we started with.
What did we achieve?
// Sorteer aArray1 op basis van de volgorde in aOrder
ASort( aArray1, , , { |x, y| AScan(aOrder, x) < AScan(aOrder, y) } )
xbrowser(aArray1)
RETURN Nil
The result is
aArray1 := {"S","M","L","2X","3X"},
which is exactly the same as aArray1 we started with.
What did we achieve?
- Fri Nov 22, 2024 3:32 pm
- Forum: FiveWin para Harbour/xHarbour
- Topic: Soporte a mariaConnect ?
- Replies: 11
- Views: 1808
Re: Soporte a mariaConnect ?
... a trabajar con sql y mariaConnect
La clase TarrayData es muy útil a la hora de trabajar con las respuestas sql : oCon:Execute()
permite cargar el result, en este objeto de memoria y operarlo (CRUD), sin afectar la base de datos... permite operaciones como : filtrar, ordenar , navegar, etc---
FWH ...
La clase TarrayData es muy útil a la hora de trabajar con las respuestas sql : oCon:Execute()
permite cargar el result, en este objeto de memoria y operarlo (CRUD), sin afectar la base de datos... permite operaciones como : filtrar, ordenar , navegar, etc---
FWH ...
- Fri Nov 22, 2024 2:15 pm
- Forum: FiveWin para Harbour/xHarbour
- Topic: Soporte a mariaConnect ?
- Replies: 11
- Views: 1808
Re: Soporte a mariaConnect ?
... a trabajar con sql y mariaConnect
La clase TarrayData es muy útil a la hora de trabajar con las respuestas sql : oCon:Execute()
permite cargar el result, en este objeto de memoria y operarlo (CRUD), sin afectar la base de datos... permite operaciones como : filtrar, ordenar , navegar, etc---
Ejp ...
La clase TarrayData es muy útil a la hora de trabajar con las respuestas sql : oCon:Execute()
permite cargar el result, en este objeto de memoria y operarlo (CRUD), sin afectar la base de datos... permite operaciones como : filtrar, ordenar , navegar, etc---
Ejp ...
- Wed Nov 13, 2024 8:22 pm
- Forum: FiveWin for Harbour/xHarbour
- Topic: xbrowse very slow vs Xbrowser
- Replies: 18
- Views: 2875
Re: xbrowse very slow vs Xbrowser
... 17a by Ceccarelli that I don't think is the official one by Fwh) and also the Sbrowse by Manuel Mercado and unfortunately I had the same slow result as xbrowse.
Then this evening I went looking for a solution to scroll my archive faster and I came across an old class of a C5 library, the ...
Then this evening I went looking for a solution to scroll my archive faster and I came across an old class of a C5 library, the ...
- Thu Nov 07, 2024 12:36 pm
- Forum: FiveWin for Harbour/xHarbour
- Topic: xbrowse very slow vs Xbrowser
- Replies: 18
- Views: 2875
Re: xbrowse very slow vs Xbrowser
... myself and give up, unfortunately in the application I'm making I have to display a lot of data, a lot of columns because there are many of them from the Italian lottery archive, I could limit myself to not inserting frills that could weigh down the dialog too much but the result is not satisfactory
- Thu Nov 07, 2024 4:58 am
- Forum: FiveWin for Harbour/xHarbour
- Topic: Copy file by mask
- Replies: 24
- Views: 2034
- Thu Nov 07, 2024 4:46 am
- Forum: FiveWin for Harbour/xHarbour
- Topic: Copy file by mask
- Replies: 24
- Views: 2034
Re: Copy file by mask
... a| FileCopy( cSrcDir + a[1], cDstDir + a[1] ) } )
? "Copied"
endif
#endif
return nil
First I built this sample with Harbour:
https://imagizer.imageshack.com/v2/xq70/922/BV9O1C.png
The result is OK. Can see the filenames in the directory correctly and also could copy to the other folder.
? "Copied"
endif
#endif
return nil
First I built this sample with Harbour:
https://imagizer.imageshack.com/v2/xq70/922/BV9O1C.png
The result is OK. Can see the filenames in the directory correctly and also could copy to the other folder.
- Mon Nov 04, 2024 10:17 pm
- Forum: FiveWin for Harbour/xHarbour
- Topic: xbrowse drag / drop (to Mr. Rao)
- Replies: 9
- Views: 943
xbrowse drag / drop (to Mr. Rao)
I asked Copilot to build a program to allow reorder rows in a list using drag & drop and xBrowse
This is the result:
#include "FiveWin.ch"
function Main()
local oDlg, oBrw, aData
aData := { ;
{ "Item 1", "Codigo 1", "Producto 1", 10, "Uni 1", 100, 5, 95 }, ;
{ "Item 2", "Codigo 2", "Producto 2 ...
This is the result:
#include "FiveWin.ch"
function Main()
local oDlg, oBrw, aData
aData := { ;
{ "Item 1", "Codigo 1", "Producto 1", 10, "Uni 1", 100, 5, 95 }, ;
{ "Item 2", "Codigo 2", "Producto 2 ...
- Sat Nov 02, 2024 9:04 am
- Forum: FiveWin for Harbour/xHarbour
- Topic: Copy file by mask
- Replies: 24
- Views: 2034
Re: Copy file by mask
Use a loop controlled by the result of a DIRECTORY() call.